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NOTES & COMMENTS 


Editor’s Notes 



Editor’s Notes 


The Hackers’ Comer Survey 



The July editor’s notes for the Software Technical Bulletin (STB) include a 
survey on sample script and source code. 

You may have noticed past STB articles have included sample script or code to 
do a task described in the article. This issue contains articles with sample script 
or code in ‘The Hackers’ Corner.’ Such script or code is offered for your 
professional interest, not as a supported Sun product. It may not work in aU 
cases, and may not be compatible with future SunOS releases. Note diat I refer 
you in each article to your local script or programming expert for problems or 
questions. 

The Hackers’ Corner ? 

Do you want to see such script or code in future STB issues? 

YES_ 


NO _ 

Thanks for your input. I will tabulate the results and publish them in an 
upcoming STB issue. 
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ARTICLES 


Read, Write Naming Conventions 



Read, Write, and Transfer 
Naming Conventions 


Single-CPU Naming 
Conventions 


This article contains a clarification of naming conventions for read and 
write operations between two, or among three or more agencies. Use the 
conventions in this article to avoid confusion about the direction of read, write, 
and transfer operations. 

The naming conventions for these operations are slightly different, depending on 
the overall system configuration. One set of conventions apply at the system 
level in a computing system having a single Central Processing Unit (CPU). 
Another set applies in the rare case of a multi-node matrix in a system without a 
single, central controller. Such multi-node matrix arrangements have the 
processing load dynamically shared among several CPUs. 

Naming conventions at the system level are straightforward when the computing 
system has a single CPU. In this case ‘read’ and ‘write’ are used with respect to 
the CPU. Read operations result in data transfers from a peripheral, for example, 
toward the CPU registers. Write operations result in data transfers from the CPU 
registers toward the peripheral device in this case. 

Variations in data transfers follow these rules. For example, a controller card 
may be sending data toward the CPU. This operation is considered a ‘read’ in 
that the data is transferred toward the CPU. It is not considered a ‘write’ with 
respect to tiie controller card since it is ordy responding to an instruction overtly 
caused by the CPU. The instruction is to send data to the CPU so it can read 
the data. 

This principle applies within hardware associated directly with the CPU. For 
example, data transferred from the main memory associated with the CPU to a 
CPU register is considered a ‘read’ operation. Again, this is with respect to the 
CPU register. 

Conversely, ‘write’ operations are described with respect to the CPU. Write 
operations result in data transfers from CPU registers out to other hardware 
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The Problem with Multiple 
CPUs 


The Multi-Node Naming 
Convention Solution 


devices. Data transfers from CPU registers outward to the main memory 
associated with the CPU are then write operations. Data transfers from the CPU 
toward peripheral device controller cards are write operations with respect to the 
CPU. This operation is not considered a ‘read’ with respect to the controller card 
since it is only responding to an instmction overtly caused by the CPU. The 
instmction in this case is to receive data from the CPU so it can write the data. 

For the purposes of this discussion, a node is considered to be an addressable 
piece of hardware. Confusion in naming conventions occurs when one agency is 
reading, another is writing, and a third may be supervising the data transfer. 
Ambiguity arises when several nodes contain CPU hardware and each initiates 
data transfers. 

The use of ‘read’ and ‘write’ depends on where the data transfer is initiated. 

If nodelj] initiates the transfer, and node (j+ll simply receives the data, it is a 
write operation with respect to node[j]. 

If nodeQ+1] initiates the data transfer, and node[j] simply supplies the data, it is a 
read operation with respect to node|j-i-l]. 

If a third agency is involved, the operation is probably a ‘transfer.’ In this case 
the data may sent in either direction or may change direction en route. 
However, data transfers into memory may be described as ‘writes’ with respect 
to the sending agency. Transfers from memory may then be described as ‘reads’ 
with respect to the receiving agency. 

Please note that read, write, and transfer operations are not described with respect 
to the memory, presumed to be passive for practical purposes in these cases. 
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Back-to-Back Ethernet 
Packets 


1 Is an output packet command available? 

If no, 

go to 1 . 

2 Is an ether available, no incoming packet in progress? 

If no, 

go to 2. 

3 Start packet transmission and listen for a coUision-detect. 


4 Is a collision detected? 

If yes, 

jam the Ethernet to force a collision-detect on aU nodes, 
run the backoff timer, 
go to 2. 


5 Go to 1. 


Software can queue several packet transmit commands to the controller chip. The 
packets so transmitted in steps 1-3 above are within the Ethernet specification. 
The time interval between packets can be as little as a few hundred nanoseconds 
at a typical 10 MHz chip clock rate. 

Back-to-back packet transmission, though within the Ethernet specification on 
the transmit-side, can cause problems on the receive-side when the hardware 
buffer size is too small or controller processing speed too slow. For example, a 
typical Network File System (NFS) response is frequently a file system block, 8 
Kb plus protocol, which becomes six Ethernet packets. This can make back-to- 
back packet processing common on Sun netwoiks. Such packets may originate 
from the same or from two different nodes, all transparent to network users. 


‘Back-to-back’ Ethernet packets are sent over the network to minimize dead-air 
time on the cable. This packet processing does not involve any actual 
negotiation, except in the case of a collision. Ignoring input issues, the logic 
involved is shown below. 
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Problems arise on the receive-side when Ethernet controller implementations 
cannot process back-to-back packets without eventually dropping one. This 
occasionally occurs due to a slow controller. More often it is due to inadequate 
buffer size to store the next packet When a packet is dropped, a protocol layer 
then has to timeout and retransmit 

For example, an Ethernet controller could have buffer space sufficient for two 
incoming packets only. A third packet is then dropped if it arrives before the first 
buffer has been emptied and released. In the case of NFS servers transmitting six 
consecutive packets and recovery occurring at the NFS level, all six packets have 
to be resent This has resulted in new mount options to reduce the transmission 
rate in both directions. 

Sun hardware includes sufficient buffer space to make this problem unlikely. 
Bridge vendors, however, can increase the chances of running into this problem 
if either buffer memory or processing power for the retransmission are 
inadequate. For example, ‘throughput’ rates of 4-6 Mbits/second across the 
bridge are typical. However, groups of six back-to-back, mostly-fuU packets 
represent a peak data rate approaching 10 Mbits/second. 
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Disk Labels and Initialization 


] 


Disk Labeling and 
Initialization 


Disk Label Questions 


Protecting the Disk Label: 
Answers 


Disk Label Precautions 


This article contains information on disk labeling and partitioning. Disk users 
need to take care to not overwrite the disk label during usage so that the 
workstation will again recognize the disk upon reboot. 

At boot time, the disk device driver initializes its disk- and partition-parameters. 
It reads the disk label residing at cylinder 0, track 0, sector 0 of the disk. The 
system does not recognize the disk if there is no disk label at boot time. 

Sun customers who need to format disks and set up partitions on disks have 
asked the following questions. 

n If there is a ‘normal’, non-swap first partition for the label on the disk, 
how does mkf s or the system know not to access that sector? 

□ Should I start the partition I want to set up at the second sector? 

Unix file systems do not use the first 16 sectors of the partition in which they are 
placed. The first sector is reserved for a label, even though the label actually 
appears only in partitions starting at cylinder 0. The next 15 sectors are reserved 
for a boot track, which may be present in any partition. 

o mkfs and newfs follow the convention of not using the first 16 
sectors. So ‘normal’ partitions are safe. However, raw partitions used 
by unconventionally coded programs and swap partitions are not safe. 

□ You do not need to begin your partition on the second sector, provided 
you use conventionally coded programs and Unix file system calls. 

A partition starts on the cylinder boundary, and extends exactly from the 
beginning of the cylinder to the partition end-point, wherever that may be. There 
is no special protection at the ‘partition level’ for the disk label. Note that 
partitions may also overlap. Any partition starting at cylinder 0 on a disk is a 
potential hazard to the disk label. 

A disk label may be located in sector 0. Note whether the software which uses a 
particular partition is the file system or one of its associated utilities, and both do 
not write into sector 0. Your disk label is then safe. Then note whether the 
software which uses this particular partition is, for example, one of the kernel 
swapping routines. You are the guaranteed to destroy your disk label. 

You may wish to take two precautions to avoid destroying your disk labels when 
you write software which opens a raw disk partition and then writes on it. 
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□ Ensure that the partition does not start at cylinder zero. This is difficult 
and may not be possible to do within the software. You will need to 
ensure that all programmers who might repartition your disks know 
about this requirement 

D Assume that any partition may start at cylinder 0. You then need to 
adopt the convention of skipping sector 0 of the partitions your 
programmers open. 
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SunAlis Release 2.0 Uses 


SunAlis Release 2.0 


Introduction 


Performance Enhancements 


New Features and Functions 



This article is a brief overview of SunAlis release 2.0, including performance 
enhancements, new features and functions, installation, and use considerations. 


SunAlis is a fuUy integrated office automation software system that combines 
applications and tools such as a document composer, graphics editors, 
spreadsheet, and electronic mail and message facilities. 

SunAlis release 2.0 is intended for use with Sun Microsystems Operating System 
(SunOS) release 3.0 and subsequent releases. Note that this release will not run 
on Sun 1(X)U workstations. 


The most significant improvements of SunAlis 2.0 are product reliability and 
performance. Performance improvements have been made in the areas of locking 
and batching, database buffering, and dumb terminal enhancements. Menu- 
based applications have been streamlined by combining them to improve 
response time, and by the availability of the new prompt mode feature to 
bypass menus. Local printing optimizations have been modified to be 
transparent to the user. 


The following new features and enhancements are provided in SunAlis release 

2 . 0 . 

□ UNIX access for dumb terminals or non-window operation 

□ Document composer enhancements 
o LaserWriter landscape mode 

o Enhanced Mail Service capabilities 

□ Menu enhancements 

□ Printing full column and row headings with spreadsheet data 

□ Bulletin Board, a publicly-shared cabinet 

Some highlights of these features are discussed in the following paragraphs. 
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Document Composer 
Enhancements 


Mail Service 


Menu Enhancements 


Bulletin Board 


Installation and Use 
Considerations 


alisverify 


The Document Composer facility has been enhanced to improve document 
production in several ways. For example, the user is now notified if he or she 
attempts to create a document having the same name as an existing document, 
and the document listing display now includes document size information in 
kilobytes. Users can now add or delete entries to a user-defined spelling 
dictionary. Both the Document Composer and Graphics text now provide 
support for mathematic, scientific, and international language characters. 


The Mail Service function now allows users to specify a sender name on 
all mail messages; the SunAlis system-supplied name is retained. This user- 
specified field is introduced with From. Mail Service has also been 
enhanced to allow the user to affix up to 255 characters of additional comments 
to a forwarded message. 


In addition to the new prompt mode feature, the menus have been enhanced 
as follows. 

□ A new facility. Log-out, is now available via the interrupt menu. 

□ A new main menu option. Other Functions, is now provided to 
enable the user to escape to the UNIX shell. 

□ When a user attempts to delete an object from a menu that is not retriev¬ 
able from the SunAlis wastebasket, the prompt Are you sure? 
appears to confirm the delete request The user can either proceed or 
cancel, as desired. 


A shared cabinet facility called Bulletin Board can now be established for 
SunAlis users. This cabinet can have up to ten owners who can check documents 
in and out. All users can access the documents on a read-only basis. The 
Bulletin Board cabinet is uniquely named as ‘Bulletin Board.’ 


The following are highlighted installation and use considerations for SunAlis 
Release 2.0. Additional infonnation can be found in the Read This First Notes 
for SunAlis Release 2.0, part number 800-1417. Refer to the Read This First as 
well as the SunAlis Administrator’s Guide, part number 800-1669, for further 
details prior to software installation. 


When installing SunAlis, you must have write access to the directory you are in 
when you ran the alisverify system verification routine; if not, 
alls verify will abort. Additionally, the current system name should exist in 
the / .rhosts file. If not, the error no entry in Lrhosts for <current system 
/ui7M€> occurs when running alisverify. Tliis message can be ignored. 
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SunAlis System Space 
Requirements 


SunAlis has the following system space requirements. 

SIZE 

16.7 Mb 

13.6 Mb Executables 

.6 Mb Model File System 

2.5 Mb On-Line Help System 

SWAP SPACE 

10-14 Mb, plus 1 Mb per user 

(More swap space required if more windows are opened) 

RLE CABINET 

10 Mb peruser 
(.7 Mb overhead) 

MEMORY 

4Mb 

(minimum) 


Mail System Gateway 
Registries 



When using SunAlis to send mail to and from SunAlis users and UNIX users or 
both, up to three different gateway registries must be created, depending on the 
system. 

SunAlis Interdomain Gateways are created and used to send and receive between 
SunAlis domains through an Ethernet connection. When creating these gateway 
registries, the only information required is the internet address of the receiving 
host. 

SunAlis to UNIX to SunAlis Gateways are used to send and receive mail through 
UNIX Bridge Gateways. When creating the gateway registry for this type of 
mail, name the gateway program gtwy2. To allow SunAlis to retrieve SunAlis 
mail from a user’s UNIX mail box, the process gtwyS must be running. To 
enable gtwy3, edit the file accaps to change the third field in the gtwy3 
entry from n to y, as shown below. This allows the gtwy3 process to be 
brought up each time aop is run. 
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accaps file before editing: 


gecvt:139:n;-bc;:: ; 
gtwyl;140:n;:::: 
gtwy2:141:n;:::: 
gtwy3:142:y;::;: 
pdbcvt:143:n:“0:::: 



accaps file after editing: 


gecvt:139:n: -be:::: 
gtwyl:140:n::: : : 
gtwy2:141:n::: : : 
gtwy3:142:y::::: 
pdbcvt: 143 :n:-o: : : : 



SunAlis to UNIX Gateways are used to send one-way mail from SunAlis to UNIX 
users. When creating the gateway registry for this type of mail, name the 
gateway program gtwyl. 


SunAlis and Sun Windows When several SunAlis windows are opened simultaneously outside Sun 

Windows, closing the SunAlis windows using the click close option 
destroys the window displays. To correct the displays, select set-aside, then 
reopen the windows. This can also be used when tihe SunAlis window does not 
get proportionately resized as a result of resizing SunTool windows. 

The screenblank function blanks out the screen when running SunAlis 
outside of Sun Windows. To retrieve the screen display, move the mouse around 
on the mouse tablet. If you are using SunAlis from a dumb terminal, use 
rlogin to log into the host from another terminal, then use kill to kill the 
screenblank process. 
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Document Composer 


Large document manipulation requires that at least the same amount of free 
space be left in the SunAlis file system as the size of the document being 
manipulated. Performance can be improved by limiting document size, or by 
dividing a large document into several smaller sections, as practical. 

Two methods can be used to print a document with headers and footers on a 
document that resides in a shared cabinet: the user can either transfer the 
document to a personal cabinet before printing, or the user can specify two or 
more documents to be printed at one time. 


o 
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SunINGRES Release 5.0 Uses 



SunINGRES Release 5.0 This article is a brief overview of SuiiINGRES release 5.0, including areas of 

significant performance enhancement, new features and functions, installation, 
and upgrade considerations. 


Introduction SunINGRES is a Sun port of the INGRES product from Relational Technology, 

Incorporated, of Alameda, California. SunINGRES is a complete relational 
database which provides the features listed below. 

□ Menu-based access to the database via SunINGRES/MENU 

□ The Query-By-Forms (QBF) forms-based query facility 

□ The Report-By-Forms (RBF) report writer facility 

□ Database access through either C- or FORTRAN-based programs via 
embedded QUEL/C, embedded QUEL/FORTRAN, embedded SQL/C, 
and embedded SQL/FORTRAN 

□ The Application-By-Forms (ABF) forms-based application development 
subsystem, which uses Operation Specification Language (OSL), a 
fourth-generation language 

SunINGRES release 5.0 is intended for use with Sun Microsystems Operating 
System (SunOS) release 3.0 and subsequent releases, and requires about 23 Mb 
of space on the database server for the executables, plus additional space for each 
database. 


Performance Enhancements 


Enhancements made to SunINGRES internals have resulted in performance 
improvements ranging from 80% up to 100% in short query benchmarks, such as 
TPl, to more than twice the performance improvement in aggregate processing 
and multi- field joins. Performance improvements result from changes made in 
the query optimizer, query processing overhead, and locking. The performance 
of applications making use of btrees will benefit from additional, major 
improvements to this storage structure. 


Reduced query processing overhead has been achieved through the following two 
changes. First, a new buffer management system implements a local buffer 
manager as a module. The module is used by SunINGRES access methods to 
manipulate pages. Second, a local buffer cache manager is used to manage local 
sets of pages (buffers) at a rate of one set per user. The local buffer manager 
provides larger buffer pools and gives preference to system catalogs and index 
pages. The user can set the size of the buffer. Additional improvements to 
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Optimizer Performance 
Improvements 


New and Changed Features and 
Functions 


Forms System Enhancements 


frontend and backend communications, and to the interpreter have also resulted 
in reduced CPU overhead. 

The following query optimizer elements have been enhanced to improve 
performance. 

□ Multi-field keys 

□ btrees 

□ Lookups in zopt catalogs 

□ Unique keys 

□ Aggregate queries 

□ Single variable queries 

□ Index data 

o Joins on functions and different datatypes 

□ opt imi z edb support for date and money via set commands 


Highlights of new and changed features and functions affecting the Forms 
System, Query-By-Forms (QBF), the new SET CACHE feature, Applications- 
By-Forms/Operations Specification Language (ABF/OSL), and EQUEL/ESQL 
are included below. For additional information, refer to SunINGRES Release 5.0 
Release Notes, part number 800-1906, and SunINGRES Release 5.0 Read This 
First, part number 800-1999. 


Highlights of changes to the SunINGRES Forms System are as follows. 

□ Program Function (PF) keys can now be used. 

□ The HELP operation has been extended to present a submenu of opera¬ 
tions for various types of help the user may desire. The text can be 
scrolled and organized in a hierarchical fashion. 

o Menu items of the same name wiU now have the same meaning 
throughout the menu system. Most menu items wiU have imique 
prefixes. 

o All error messages now request that the user strike the <RETURN> key 
as an acknowledgement. 
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□ VIFRED (Visual FoRms EDitor) and RBF have been modified to 
display the catalogs frame listing existing frames or reports. Users 
can then proceed to the layout frame to design a new object, or edit 
an existing object 

□ The doUar signs appearing at the end of objects being moved in 
VIFRED and RBF have been removed. The object being moved now 
blinks when the move command is in effect. 


Query-By-Foms Significant enhancements and changes to QBF (Query-By-Forms) in release 5.0 

are as follows. 

When creating a default form, the user can now choose to use a tabletield 
or simple field. When working with forms, note that the delete 
operation within update mode has been changed to display a submenu of 
choices. 

Query mode has been modified to include any combination of ‘ands’ and ‘ors’ to 
selection criteria. Upon entering the last character in a field, the first character 
scrolls to the left, out of the screen display. When the user tabs out of the field, 
the character reappears. This occurs in the QBF retrieve and update 
modes. When specifying queries, values can be entered in a field by left- or 
right-scrolling or both of the individual fields. Sorts made from the query form 
can be made on any combination of keys, in ascending or descending order. 


The SET CACHE Command Release 5.0 includes a new local cache, used with the new SET CACHE 

command to increase the size of local caches. Because SunlNGRES manages 
each user’s local cache with locks, and each page of local cache consumes one 
lock, consideration should be given to the effect of increasing the size of local 
caches prior to using the SET CACHE command. Refer to the 
SunINGRESiQUEL Release 5.0 R^erence Manual portion of the SunlNGRES 
Manual Set, part number 800-1644, for complete information on the SET 
CACHE command. 


Applications-By- 
Forms/Operations System 
Language (ABF/OSL) 


Highlights of the ABF/OSL features and functions which have been changed or 
added are discussed below. 

In SunlNGRES release 3.0, program statements inside an UNLOADTABLE loop 
could only refer to tablefield data copied into hidden fields. If an explicit 
reference was made to a table. column, it was interpreted by OSL to mean 
‘for the row the cursor was on before the UNLOADTABLE began.’ 

In SunlNGRES release 5.0, however, the data need not be copied into hidden 
fields for use inside the UNLOADTABLE loop, and an explicit reference to a 
table. column is interpreted by OSL to mean ‘for the tow currently being 
unloaded.’ Refer to the unload table section in Appendix A.2 of the 
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New OSL Keyword byref 


EQUEL, ESQL, and the UNIX 
Allocator 


SunINGRES/Applications: Applications-By-Forms (SQL) User’s Guide portion 
of the SunINGRES Manual Set, part number 800-1664. 

AH EQUEL procedures called from OSL must now be defined explicitly as 
procedures to ABF. A source file for this procedure must also be specified, 
although that file can be empty. For example, assume a user is calling a 
procedure named ‘checkdate,’ which is an object library listed in the linker 
options file, pointed to by the SunINGRES name ING_ABF0PT1. The user 
defines a procedure to ABF named ‘checkdate’ and specifies an existing (but 
empty) source file. The application will link correctly, even though the source 
code for the procedure is not in the application’s source code directory. 

In SunINGRES release 5.0, expressions can now be used where previously only 
constants were allowed; for example, expressions are now valid in messages, 
subsystem calls, prompts, and so forth. In the QUEL or SQL part of the OSL 
language, a string constant, id, or field name can now be used in place of a name. 
The name of the field is preceded by a colon (:), as in ' :fieldname.’ Note that the 
structure is fixed, and cannot be built dynamically, as in an EQUEL param 
statement. 

When passing arguments, the default is by value. The user can optionally pass 
arguments by reference. Arguments can be passed to frames, host language 
procedures, and OSL procedures. This allows the user to return more than a 
single value to the calling frame. 


The default method of passing string variables from OSL to EQUEL/C 
procedures is by value. Any changes made to such variables in the EQUEL/C 
procedure is not reflected in the calling frame. In order to pass an OSL variable 
by reference to a procedure written in EQUEL/C or any other EQUEL language, 
the procedure call must include the new OSL keyword byref. Refer to 
Appendix C.3 of the SunINGRES!Applications: Applications-By-Forms (SQL) 
User’s Guide portion of the SunINGRES Manual Set, part number 800-1664. 


In SunINGRES release 3.0, the storage allocator in compatlib used by 
EQUEL and ESQL programs conflicted with the malloc/free allocator in 
UNIX libc.a. The different allocators would hand the same piece of memory 
to different clients, thus causing subtle, hard-to-locate problems. 

To solve this problem, release 5.0 now provides versions of malloc(3), 
calloc(3), realloc (3), free (3), and cfree (3), written in terms of 
the SunINGRES allocator. On BSD systems, vallocO and memalignO 
are also provided. These routines behave according to the specification in both 
the UNIX manual and the System V Interface definition, but may not duplicate 
undocumented behavior of the libc allocator. 
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Using UNIX Signals in an 
EQUEL or ESQL Program 


Installation and Upgrade 
Considerations 


Installation 


Upgrading from SunlNGRES 
Release 3.0 to 5.0 


The return value of malloc(O) is not defined. The UNIX libc.a malloc 
returns a pointer to ‘somewhere’, and the malloc (3X) version returns NULL. 
The user should not be relying on either behavior. The current comp at lib 
returns a pointer to a non-zero length object. 


The user can catch any UNIX signal, then use it to alter the control flow of his or 
her program. If this altered control flow also affects SunlNGRES, the proper 
EQUEL or ESQL instructions must be issued to abort the current SunlNGRES 
operation. 

For example, if a program is in a retrieve loop, and it should break out of the 
loop upon receipt of a signal, then continue with other operations, the command 
line ## endretrieve must be issued after the signtd is received and before 
continuing the program. This notifies the SunlNGRES backend (the process 
performing the actual DBMS operations) that the retrieve has been aborted, and 
prevents results from being returned for the aborted query. 

For additional information regarding the use of UNIX signals, refer to the 
SunlNGRES 5.0 Release Notes, part number 800-1906. 


The following are installation and upgrade considerations for SunlNGRES 
release 5.0. Additional information can be found in the Read This First-Notes 
for SunlNGRES Release 5.0, part number 800-1999; SunlNGRES 5.0 Release 
Notes, part number 800-1906; and Chapter 2 of the SunlNGRES Installation 
Guide, part number 800-1681. 


Most of the steps involved in the SunlNGRES installation procedure have been 
automated by a new installation shell script. Refer to Chapters 2 and 3 of the 
SunlNGRES Installation Guide, part number 800-1681, for complete instmctions 
on how to read the installation tape and run the installation script. 

Due to fixes made in release 5.0, users who have btree primary storage 
structures or btree secondary indexes should re-modify them to btree after 
installing release 5.0. 


When upgrading your system from release 3.0 to 5.0, keep in mind the following. 

□ Release 3.0 databases need not be converted to run under release 5.0. 

□ The SunlNGRES lock manager must be re-installed. For details, refer t 
0 Chapter 3 of the SunlNGRES Installation Guide, part number 800- 
1681. 

□ Due to a change in SunlNGRES internal lock naming conventions, do 
not attempt to run release 5.0 simultaneously with release 3.0 on the 
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same installation. Release 5.0 can run on a release 3.0 database, as long 
as no release 3.0 user is simultaneously woildng in the same installation. 

□ The I I_INSTALLATI0N variable must be set for each installation 
running on a given system. I I_INSTALLATI0N must be a unique 
two-character code for each installation, and is set during the installation 
script procedure. 

o Release 3.0 EQUEL and ABF applications do not need to be recompiled 
or relinked when release 5.0 is installed. 


SunlNGRES System Space SimlNGRES has the foUowing system space requirements. 

Requirements 

SIZE 

23Mb Executables, plus size of database 

MEMORY 

4Mb 

(minimum) 



o 
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Quick SCSI Disk Test 



Quick SCSI Disk Test 



If your Small Computing System Interface (SCSI) disk appears to be responding 
slowly and you suspect a ^sk malfimction, this article contains a quick check 
you can perform without having to halt UNIX. 

Use the dd (1) command invoked from the shell as shown below to test your 
SCSI disk for correct reading speed. The dd(l) command reads a one- 
megabyte file. Seethe time(l) and dd{l) manual pages in the Comma/itfa 
R^erence Manual, part number 800-1295, for details. 

This test should take about six seconds on a Sun-2 workstation, or about four 
seconds on a Sun-3/100 series workstation. If it takes appreciably longer, you 
may have a problem with your disk or disk controller. Of course, your machine 
should not be too busy when this test is performed. 

You need to have read permission on the raw disk device to do this test. Usually 
only root has read permission. Note that the command you enter is shown 
below in bold. 


# time dd if s/dev/rsdOa of=/dev/null bs=16b covint=128 

128+0 records in 
128+0 records out 

0.Ou 0.4s 0:04 9% 1+lk l+3io Opf+Ow 

# 
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SunOS Release 3.3 and Subnets 



O i 


SunOS Release 3.3 and 
Subnets 


Several Sun customers have called about enabling subnets while running SunOS 
release 3.3. The customers expect their broadcast messages to be ‘subnetted 
broadcast’ messages. One example is expecting to broadcast to 100.50.5.0 
instead of 100.0.0.0. However, the customers are finding many 100.0.0.0-style 
broadcasts going out over the wire. 

The reason for ‘subnetted broadcast’ messages not appearing as expected is that 
some of the programs that process broadcasting (ypbind, rup, umount, 
rwho, and the like) are not included on the SunOS release 3.3 tape. Thus, the 
if conf ig option may be present to place the proper subnet address into the 
kernel. However, the SunOS release 3.2 programs ignore the kernel value and 
always broadcast to net.0.0. New programs that broadcast using the kernel value 
are included in SunOS release 3.4. 


SunOS release 3.3 includes in. routed broadcasts. 


Please note that rwhod does not read the broadcast address from the kernel 
when running SunOS release 3.4. We are looking into this capability for 
inclusion in SunOS at a future time. 
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Mapping PF and Arrow Keys 



Mapping PF and Arrow Keys Problems arise when Sun2/100U customers using VTlOO-style keyboards try to 

change a key function. VTlOO-style keyboards share this problem with Sun2 and 
Sun3 keyboards: they map to something that you cannot specify in ttyswrc. 

In this case, customers need to use KIOCSETKEY to change the key to 
something you can specify. See kbd(5) for information on keys PF1-PF4. Under 
the VTlOO-style keyboard table you will see, in part, the following code. 


/* Unshifted keyboard table for "VTIOO style" */ 

static struct keymap keytab_vt_lc = { 

/* 0 */ HOLE, BUCKYBITS+SYSTEMBIT, 

HOLE, HOLE, HOLE, HOLE, HOLE, HOLE, 

/* 8 */ HOLE, HOLE, STRING+UPARROW, 

STRING+DOWNARROW, 

STRING+LEFTARROW, 

STRING+RIGHTARROW, 

HOLE, TF(1), 

/* 16 */ TF{2), TF(3), TF(4), c('['), '1', '2', '3', '4' 


PF1-PF4 are treated as TF1-TF4 (TF signifying Top Function, as opposed to 
Right, Left, and Bottom). So they are the equivalent to F1-F4 on your Sun-3 
keyboard. 

Please note that FI is the SunView capslock key. 
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ndl Partitions and dumping 


Using ndl Partitions in 
Dump Procedures 


Dumping the ndl Partitions 
Separately 


Using ndl Partitions with 
newf s 



When dumping a set of clients, dump the actual ndl partitions. This is preferred 
to dumping nd partitions because of how the nd partitions are handled by 
dump. For example, assume a set of nd partitions exists in the same disk 
partition, nd essentially creates a new set of mass storage devices that ‘secretly’ 
exist on the disk. When dump is used to dump the disk partition, dump opens 
the partition, locates the superblock, and then dumps the file system. The 
supefblock located by dump is the superblock for the first nd partition, 
dump wiH dump this partition and then stop. If the first nd partition is a swap 
partition, dump fails without dumping any partition. 


The correct way to dump a set of clients is to dump the ndl partitions 
separately. Essentially, each ndl partition acts as a complete and separate disk 
partition. When you need to restore the ndl partitions, run mkf s first to make 
a file system, and then run restore -r. 


ndl partitions differ from other disk partitions in that ndl partitions do not 
have labels, thus the newf s utility cannot be used. When newfs is used, it 
first reads a partition label, makes a file system to fill the partition, and then 
writes a boot block onto track 0 of the partition. Because the ndl partitions do 
not have labels, newf s fads. 

It is possible to mimic the newfs functions for ndl partitions by performing 
the following steps. 

1. Read np.local. 

2. Run mkfs to make a file system of the appropriate size on the ndl 
device. 

3. The usual case is to boot from /pub. To boot directly from the client 
partition, additionally run installboot. 
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setup and Partition Sizes 



Determining Actual Partition When partitioning disks, setup appears to return the wrong figures for disk 

Size with /etc/mkf s sizes. The figures displayed are consistently lower than they should be, and do 

not match the formatted size returned by the diagand dkinfo utilities. 

There are several explanations for this size difference. For example, due to file 
system overhead (which includes super-block, inode list, and free list), the file 
system size displayed by setup is actually the remaining amount of usable 
space that is available to the user. For further information on file system layout, 
refer to Appendix A, File System Check Program, in the System Administration 
for the Sun Workstation manual, part number 800-1323. 



Another possibility is that most utilities appear to occupy about 10% more disk 
space than is actually used. This is because the last 10% of the disk is reserved 
for use only by the supemser when in setuid or root or both. The extra 
space allows root room to maneuver on the disk. Because of this, a file system 
can appear to occupy 111 % of the disk using setup. 

It is also possible that the figures displayed by setup include the amount of 
space lost when newf s is run. 


How to Verify Actual Partition The actual partition size can be verified by entering the size of the partition in 

Size question as values to /etc/mkf s, as in the example below. 

mkfs /dev/null (partition size) 67 20 8192 1024 16 10 60 

This returns the partition size and the superblock backups for an Eagle XP 
(M2361), and will not write to disk. This is also a useful way to locate alternate 
superblocks. 
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NFS and mount Hints 


NFS and mount 


Helpful Hints 



In a typical Sun netwoik, several machines can be interdependent for services 
such as YP, mail, and NFS. Many systems utilize an older machine for mail, 
print, or another dedicated service typically short on disk space requirements, 
such as a Sun 2/120 with 70Mb disk capacity. In situations where the NFS server 
goes down (for example, if another machine had been hard mounted to write 
some files), mail eventually stops, and returns the following error message 
shortly after login. 

NFS server not responding 

This error message also appears if the NFS server goes down, and the other 
machines have no way to continue. The problem is that the shell tries to build a 
hash table of commands based on the root login path. If any NFS directories are 
encountered in the root login path, or if any NFS mount points exist in the 
directories in the path, the system hangs for hard mounts and times out for soft 
mounts. Since the mount (8> command is now in the rc.boot file, the 
system cannot boot with the -b switch to avoid the NFS problem. 


The best preventive measure is to keep the root login path free of NFS 
directories. If this is not possible, the following hints wiU help avoid problems. 

□ Mount partitions with the bg (background) option. This allows boot to 
continue while waiting for the mount to succeed or fail. 

□ Use the intr (interrupt) option when mounting partitions, to allow an 
operation on a hard partition to be killed. 

□ Move the mount -vat nfs to the end of the rc. local file, or 
after nfsd 4. This helps alleviate problems with machine interdepen¬ 
dencies. 
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sendmail and Aliases 



sendmail and Postmaster 
Aliases 


When sendmail reads the /usr/lib/aliases file, it maps the left side 
of the alias definition to lower case, as shown below. 

Alias definition as entered in the /usr/lib/aliases file: 

Postmaster: user@sun 

Alias definition as mapped by sendmail: 

postmaster: userOsun 


When a flag for a particular mailer is set, sendmail maps the recipient name 
to lower case for that mailer. This flag is set for the ‘local delivery’ mailer, so 
that mail directed to ‘Postmaster’, ‘postmaster’, ‘POSTMASTER’, and so on is 
sent to ‘postmaster’. 



The Workarounds 



Names on the right side of the alias definition, however, are not mapped to lower 
case; neither at the time the /usr/lib/aliases file is read, nor when 
testing to see whether any names to which an alias expands are themselves 
aliases, sendmail cannot teU, which mailer will deliver mail to a particular 
name until sendmail has checked the name against its rewriting rules. This 
prevents mail from being delivered by a mailer that is case-speeific, in which 
case the name mapping would be incorrect. 

For example, consider the following alias definition. 

MAILER-DAEMON: Postmaster 

When mail is sent to ‘MAILER-DAEMON’, sendmail first translates 
‘MAILER-DAEMON’ to ‘mailer-daemon’. Thus, the translated alias definition 
appears as follows. 

mailer-daemon: Postmaster 

>Vhen sendmail locates the alias definition, it expands ‘MAILER-DAEMON’ 
to ‘Postmaster’, sendmail then looks up ‘Postmaster’, not ‘postmaster’. The 
problem is that the alias definition shown in ‘Postmaster: user@sun’ will have 
been translated to lower case, as in ‘postmaster: user@sun’. This translated alias 
definition will not be able to expand ‘Postmaster’. 

Currently, the way to ensure problem-free alias definitions is to specify aU local 
addresses appearing at the right side of an alias definition in lower case. A 
further preventive measure is to never specify ‘Postmaster’ to the right of a colon 
inthe /usr/lib/aliases file. 
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When rdump is used to perforai a remote dump, it essentially performs the 
equivalent of rsh on a local machine, rdump does a call to the rcmd library 
routine to start up the /etc/ rmt daemon on the remote machine. 

The rcmd library routine can be used only if the user can remotely log in as a 
user without a password, dump, by default, runs /etc/rmt with the same 
user name as the user’s name on the local machine. An rdump therefore cannot 
be performed successfully unless the user can either rlogin as root on the 
remote machine without a password, or if another userid is specified with dump. 

Since it is not always possible to remotely log in as root without a password, the 
usual approach is to specify another userid with dump, as shown in the example 
below. 

dump Of <host>.<user>:<tape> . . . 

Note that a period is used to separate the host and user names. Because of this 
syntax, problems result when using rdump to perform a remote dump with host 
names containing periods, as in the example below. 

rdump 9ufdsb sun.training.ctr:/dev/rstO 1600 2200 10 /dev/rsdOg 

When rdiunp is run, the following error message is returned. 

sun.training: unknown host 

At first glance, it appears that the last element of the host name is being 
deliberately stripped off. What actually happens, however, is that the use of 
periods in the host name conflicts with the use of the period as a domain 
component separator in the command syntax. 

Two Workarounds Two workarotmds can be used when dealing with host names containing periods. 

One approach is to put another name in the hosts file which does not include 
the periods, as in the example below. 

192.9.200.XXX sun.training.ctr suntrainingctr 

The name not containing periods can then be used as the name for the dump host. 

Another workaround is to enter either root or the user name of the person 
performing the dump at the end of the remote host name. This entry is then 
preceded by a period, as in the example below. 

rdump 9uEdsb sun.training.ctr.root:/dev/rstO 1600 2200 10 /dev/rsdOg 


rdump and Host Names 


Using rdump with Host 
Names Containing Periods 
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Incompatibility: SuntlNIFY, SunUNIFY and SunSimplify users should be aware that these products and their 

SunSimplify, and ACCELL associated databases are incompatible with releases of Unify Corporation’s 

ACCELL™ product and its associated databases, and is therefore an unsupported 
product combination. 

When used with ACCELL, the SunUNIFY or SunSimplify databases might 
become corrupted. The corrupted databases must then be restored from a 
backup. Additionally, users should not run SimUNlFY or SunSimplify on 
ACCELL databases. 

As a workaround, SunUNIFY users can convert their databases to ACCELL 
databases. Once converted, ACCELL can be used safely. 


Q 


O 


^sun 

miorosysteiTis 


July 1987 






o 


o 




Q 


4 


IN DEPTH 


IN DEPTH. 275 

Color Maps... 275 


o 


o 







o 


o 


o 







Color Maps 


Sun Color Applications 


An Overview to Color 



In this in-depth article, we discuss the use of color on the Sun Workstation. 

□ Overview to Color 

□ Hardware Frame Buffers 
D Using suntools 

□ SunView 

□ Sun CGI 

□ SunCore 

□ Prism System - Sun Model 3/110 

The Sun windows and graphics packages support the use of colors. The two Sun 
windows packages are suntools and StmView. Two Sun graphics packages 
are SunCGI and SunCore. The graphics packages may use colors whether they 
are running inside or outside the window system. 

Customer applications may each create their own colormap, or share a colormap 
created by a previous application. The colormap is created by defining red, 
green, and blue color arrays. A user sets the intensity of the color in each array 
as desired. The colormap index is defined as the index into the red, green, and 
blue color arrays. For example, colormap color index 3 displays the color 
defined by the combined contents of red[3], green[3], and blue[3]. The user 
application changes the colonnaps on the screen, by changing the contents of the 
red, green, and blue color arrays; not by changing the index. 

A total of 256 ( 2 ) colors may be chosen from a palette containing 16 
million ( 256 ) colors. This limitation is imposed by the color frame 
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buffer hardware. The memory allocated for the color frame buffer has as 
many colormaps loaded as possible, not to exceed the 256 total colors 
restriction. If the user applications that are running exceed 256 colors, 
some colormaps will be swapped out. The system determines which 
colormaps are loaded, by the user placement of the mouse. 

If you run a combination of applications whose colormaps cannot all be held in 
the frame buffer at the same time, the colormap for the window containing the 
mouse is placed in the frame buffer so that it fits into a contiguous number of 
positions. The other windows on your screen may then be displayed in spurious 
colors, or may be black. 

Hardware Color Frame Buffers The color frame buffers that Sim supports are described below. 

/dev/cgoneO 

for Sun 2 color, multibus systems 
/dev/cgtwoO 

for Sun 2 systems with the VME bus, and Sun 3 systems 
/dev/cgfourO 

the Prism frame buffer for Sun model 3/110 systems 
/dev/gpone 

the graphics processor, used with /dev/cgtwoO on the Sun 
model 3/160C and 3^60C systems when this optional hardware 
board is installed. 

Viewing Surfaces The Sim graphics packages distinguish between the inside and outside of the 

window system. While running under suntools, the graphics packages use 
different window devices as the view surfaces. 

The color view surfaces for the window system are the ‘color graphics pixwins,’ 
called ‘cgpixwindds.’ The graphics packages while running inside the window 
system use ‘cgpixwindds’ or ‘gppixwindds.’ While running outside the window 
system, the graphics packages use the raw flame buffer. These devices are 
known as cgldd, cg2dd, cg4dd, and gpldd. These devices are described 
below. 

CGIDD the Sun 1 color flame buffer device; and for Sun 2 

multibus systems when running outside suntools, in 
‘console mode’ 

CG2DD the Sun 2 and Sun 3 color flame buffer device when 

running outside suntools, in ‘console mode’ 

CG4DD the Sun 3/110 color flame buffer device when running 

outside suntools, in‘console mode’ 
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CGPIXWINDD a color window, when running the application in a 
suntools window; or in a SunView canvas subwindow 

GPIDD the graphics processor when running the application 

outside suntools, in ‘console mode’ (SunCoie ordy) 

GPIPIXWINDD the graphics processor when running the application in a 
suntools window, or in a SunView canvas subwindow 
(SunCore only) 

See the SunCore Reference Manual, part number 800-1257; and the SunCGI 
Reference Manual, part number 800-1256, for further inforaiation. The ‘eg’ 
devices run on the Sun 2 and 3 frame buffers. The ‘gp’ devices run on the 
graphics processor in conjunction with the color frame buffer. 

The graphics processor is Sun’s hardware graphics accelerator. This is a single¬ 
board option. An additional graphics buffer board option may also be added at a 
later time. 

Sharing Colormaps The Unix kernel manages the window system and its colormaps. It gives a name 

to and then stores a colormap when defined. Any particular colormap may be 
shared among applications by using the same colormap name. This is true across 
Sun products such as SunView, SunCore, and SunCGI. 

Applications may share colormaps by calling pw_setcmsname () with the 
arguments being the pixwin for that window, the colormap name already 
defined, followed by pw_putcolormap (). pw_putcolormap () sets the 
colonnap size and points to the colonnap’s red, green, and blue arrays. When 
sharing colormaps, the application which defines the colormap must be miming 
before the windows for other applications may attach to that colormap. 

The colors of a window may be changed ‘on the fly’ by modifying the red, green, 
and blue color arrays; and then by calling pw_putcolormap () to recolor the 
window. The pw_put colormap {) call changes the values in the colormap 
table. The CRT then redisplays the same pixel values. The color index is the 
same; however, a different color is projected on the screen. The pixels on the 
screen contain the index number into the colormap. The color which the index 
represents may be changed by modifying what the colormap represents. This is 
done by changing the contents of the red, green, and blue arrays. It is faster to 
change the colormap than to redisplay the screen. 

suntools The sun windowing system which is invoked by calling the command 

suntools with the -f and -b options, sets the default frame buffer colors. 
These colors are inherited by tools and other applications running inside the 
window system unless otherwise specified. Without these options, all 
applications receive the default colormap name ‘monochrome’ which defines 
white (red = 255, green = 255, blue = 255) as the backgroimd color, and black 
(red = 0, green = 0, blue = 0) as the foreground color. 
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The user may invoke tools such as shelltool, textedit, cmdtool, and 
gfxtool, with different foreground and background colors by specifying the 
-Wf and -Wb options. For example, the following shelltool is displayed 
with a red border and blue namestripe. The inside of the tool remains black and 
white. 


shelltool -Wf 0 0 255 -Wb 255 0 0 

Following the -Wf and -Wb options are the red, green, and blue color 
intensities. For example, the following tool has the foreground color purple and 
a light blue background, for not oiily the frame border and namestripe, but also 
for the window inside the tool. This is accomplished by adding the -Wg option 
as the example below shows. 

shelltool -Wf 185 000 184 -Wb 102 250 247 -Wg 

Sun View SunView applications may define their own colormaps or share colormaps up to 

the maximum 256 frame buffer colors. First, define the colormap size for each 
application. Second, set up the red, green, and blue arrays. Color number 0 is 
the color defined by red[0], green[0], and blue[0]; color number 1 is the color 
defined by red[l], green[l], and blue[I]; and so forth. The size of each colormap 
must be a power of 2, i.e. {2,4,8,16,32,64,128, or 256}. 

A minimum value of 0 is used for no intensity of that color. A maximum value 
of 255 is used for full intensity of that color. For example, red[15] = 200, sets 
the 16th element of the red array with a very strong red. Blue[10] = 15, sets the 
11th element of the blue array with a light intensity of blue. The intensity 
determines how intensely the monitor Cathode Ray Tube (CRT) displays the 
color. 

For a given pixwin, use pw_setcmsname () to set the colormap name. The 
arguments are the pixwin for the window, and a character string. To bind the 
colormap to the pixwin, use pw_j)utcolormap (). The arguments are the 
pixwin for the window; the starting entry into the colormap; the number of 
colors; and the red, green, and blue color arrays. Again, the number of colors 
must be a power of 2. 

A SunView example follows. 
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* SunView color example 

* Draws color lines in a canvas 
*/ 

#includ.e <suntool/sunview.h> 
#include <3untool/canvas.h> 

#define NCOLORS 4 


Frame 

Canvas 

Pixwin 

main() 

{ 


int 


frame; 

canvas; 

*pw; 


i; 



u_char red[NCOLORS], green[NCOLORS], blue[NCOLORS]; 


frame = window_create( NULL, FRAME, 

0 ) ; 

canvas = window_create( frame, CANVAS, 

0 ); 

/* 

* Set up the red[], green[], and blue[] arrays. 

*/ 


red[0] = 255; 
red[l] =0; 
red[2] = 0; 
red[3] = 208; 


green[0] = 0; 
green[1] = 255; 
green[2] = 0; 
green[3] = 173; 


blue[0] 
blue[l] 
blue[2] 
blue[3] 


0; /*red */ 
0; /*green*/ 
255; /*blue */ 
203; /*pink */ 


/* 

* Get the canvas pixwin, initialize the colormap, 

* and put the colormap into the canvas window. 

*/ 



pw = canvas_pixwin( canvas); 

pw_setcmsname< pw, "Four Colors”); /*kernel now has this name*/ 
pw_putcolonnap( pw, 0, NCOLORS, red, green, blue); 


/* 

* 

*/ 


Draw lines in the canvas. 


for (i=l; i < NCOLORS; i++) 


{ 




July 1987 




280 Software Technical Bulletin issue 1987-6 


/* 

* 

*/ 


} 

window_ 

} 


SunCGI 


The P1X_SRC|PIX_COLOR raster op adds the color index 
to the source pixel value for display. 

pw_rop(pw, 10, i*20, 300, i*20, PIX_SRC|PIX_COLOR(i),0); 

main_loop(frame); 



SunCGI must define its own colormap by creating a new colormap or using a 
shared colormap whether the SunCGI application is running inside or outside the 
window system. 

The SunCGI color intensity scheme is the same as SunView, ranging jftom 0 to 
255. 

In StmCGI, first set the dd element of the view surface structure to be the frame 

buffer type {CGIDD, CG2DD, CG4DD, GPIDD, or CGPIXWINDD}. In 

the window environment, the graphics processor is accessed through 

CGPIXWINDD. If the graphics processor is available, the CGPIXWINDD uses 

that device for transformation calculations. Within the view surface structure, set 

the cmapsize element to the colormap size, and the cmapname element to 

the string that names the colormap. When the view surface is opened, and the j 

red, green, and blue color arrays are initialized; the colormap array of type i 

Ccentry points to the red, green, and blue color arrays. 

A SunCGI example follows. 
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/* 



* 

A SunCGI 

"C” program 

★ 

Draws colored lines 

*/ 

Run in a 

gfxtool 


♦include <cgidefs.h> 
♦include <stdio.h> 

♦define NCOLORS 64 
♦define MIN -0 

♦define MAX 10000 

static Ccoor vpll 

static Ccoor vpur 

main() 


= { MIN, MIN )/ /* lower left corner */ 

= { MAX, MAX ); /* upper right corner */ 


int name; 

Cvwsurf device; 

Ccoorlist line; 

Ccoor points[2]; 
int i ; 

Ccentry clist; 
u_cha r red[NCOLORS] ; 
u_char green[NCOLORS]; 
u_char blue[NCOLORS]; 

/* start cgi */ 
device.dd = CGPIXWINDD; 
open_cgi(); 

open_vws(Sname,sdevice) ; 
vdc_extent(&vpll,&vpur); 


/* view surface name */ 

/* view surface device */ 
/* line coordinate list */ 
/* point list */ 

/* position counter */ 

/* color map list */ 

/* red color map */ 

/* green color map */ 

/* blue color map */ 


/* select output device */ 
/* initilize cgi */ 

/* open view surface */ 

/* reset vdc space */ 


/* set the line attributes */ 
line_width_specification_mode(ABSOLUTE); 
line_width(1.0); 

/* set up the color map */ 
for(i=0; KNCOLORS; i++) { 
red[i] = (i*3); 
green [i] = 64; 
blue[i] = 128; 

} 

clist.n = NCOLORS; 
clist.ra = red; 
clist.ga = green; 
clist.ba = blue; 
color_table(0,&clist); 

/* draw colored lines */ 
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line.n = 2; 
line.ptlist = points; 

for <i = 0; i < NCOLORS; i++) 
line_color(i); 
points[0].y = MIN; 
points[0].x = {i*1000) ; 
points[1].y = MAX; 
points[l],x = (i*1000); 
polyline(Sline); 

} 

sleep(3); 

/* end cgi */ 
close_vws(name); 
close_cgi 0 ; 


o 


SunCore 


SunCore applications running on the console window, in a gfxtool, a 
shelltool, or in a SunView canvas window must define their own colormaps. 
SunCore color devices are CGIDD, CG2DD, CG4DD, CGPixwiNDD, 
GPIDD, and GPIPIXWINDD. 


SunCore colors do not range from 0 to 255. Instead they range as 256 possible 
values between 0 and 0.99. Most users familiar with the SunView model may 
assign their colors as shown in the example below. 



float red[256]; 


for (i=0; i<256; i++) { 

red [i] = (float)i * ( (float)1 / (float)256 ); 

} 


In SunCore, the view surface cmapsize must be set to the size of the color 
table, and cmapname must be set to the colormap name. These must be set 
before the initialize_view_surface (> caU. After the viewport and 
window are set up, you may define the color indices for text, line, and flU 
operations using the def ine_color_indices () call. 

A SunCore C-language program example follows. 


o 
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* SunCore example written in "C" 

* Writes a string in color 

* Run this in a gfxtool 
*/ 

#include <usercore.h> 

♦define NCOLORS 8 

int cgpixwindd(); 

struct vwsurf vwsurf = DEFAUIiT_VWSURF (cgpixwindd) ; 

main() 

{ 

float red[NCOLORS], green[NCOLORS], blue[NCOLORS]; 
float X, y; 
int i; 




vwsurf.cmapsize = NCOLORS; 

strcpy (vwsurf.cmapname , "Colormap"); 

red [0] = 0.99; 

green[0] = 0.99; 

blue [0] = 0.99; 

for ( i=l; i < NCOLORS; i++) { 

red [i] = (float)i * (1.0 / (float)NCOLORS); 

green [i] = (float)i * (1.0 / (float)NCOLORS); 

blue [i] = (float)i * (1.0 / (float)NCOLORS); 

} 

if (initialize_core(BASIC,NOINPUT,TWOD)) 
exit(1); 

if (initialize_view_surface(Svwsurf,FALSE)) 
exit(2); 

if (select_view_surface(Svwsurf)) 
exit(3); 

set_viewport_2 (0.0,1.0,0.0,.75); 

set_window (-100.0,100.0,-100.0,100.0); 

/* 

* SunCore - You pass NCOLORS-1 since SunCore wants to 

* to know where the last value is, not the colormap size. 

*/ 


define_color_indices(fivwsurf,0,NCOLORS-1,red,green,blue); 
create_temporary_segment 0 ; 

X = -100.0; 

y = 90.0; 
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for (i = 1; i < NCOLORS; i++ ) { 

/* 

* Set line index = color index. 
*/ 

set_line_index { i) ; 
move_abs_2 (x, y) ; 
y = y - 20.0; 
line_abs_2 ( x, y) ; 

X = X + 20.0; 

} 

sleep ( 5) ; 

close__teinporary_segment () ; 
deselect_view_surface(Svwsurf) ; 
terminate core(); 


o 


When writing SunCoie programs in FORTRAN, the programmer must set up the 
view surface structure array elements as shown in the example that follows. The 
rest of the code is similar to the C-language example above; in setting up the red, 
green, and blue arrays; assigning colors with intensities from 0 to 0.99; and 
applying the colors to lines, text, and fill operations. 

A SvmCore FORTRAN program example follows. 




^sun 

mferosystams 


July 1987 







Section 4 — In Depth 285 



c 

c SunCore program in FORTRAN 
c Draws two lines 

c Run in a gfxtool 

c 

include '/usr/include/f77/usercore77.h' 

integer vsurf(VWSURFSIZE) 
c 

c Initialization of view surface structure, 

c 

character *20 screenname, windowname, cmapname 
integer cmapsize 

equivalence (vsurf<1), screenname) 
equivalence (vsurf(6), windowname) 
equivalence (vsurf(14), cmapsize) 
equivalence (vsurf(15), cmapname) 


c 

c 

c 



c 

c 

c 


c 

c 


c 

c 

c 


c 

c 

c 



Declarations of all color devices. 

integer cgldd, cg2dd, cgpixwindd 
external cgldd, cg2dd, cgpixwindd 

Create color arrays. 

real red(4), green(4), blue(4) 

integer initializeCore, InitializeVwsurf, SelectVwsurf 


data vsurf /VWSURFSIZE*0/ 


vsurf(DDINDEX) = loc(cgpixwindd) 

if (InitializeCore(BASIC, NOINPUT, TWOD) .ne. 0) call exit(l) 
Display current vsurf information, 
print *, 'initializeCore:' 

print *, 'screenname: ', screenname, 'windowname: ', windowname 
print *, 'cmapname: ', cmapname , 'cmapsize: ', cmapsize 

Initialize colormap. 


cmapsize = 4 

red(l) =0.0 
green(1) = 0.5 
blue(1) =0.0 


red(2) 


= 1.0 
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green(2) =0.5 

blue(2) =0.0 

red(3) = 0.0 

green(3) = 1.0 

blue{3) = 0.5 

redi{4) = 1.0 

green(4) = 0.0 

blue(4) =0.5 

print *, 'red: red(l), red(2), red(3) 

print *, 'green: ', green(1), green(2), green(3) 

print *, 'blue: ', blue(l)/ blue(2), blue(3) 

c 

c Initialize view surface and window, 

c 

if (InitializeVwsurf(vsurf, FALSE) .ne. 0) call exit(2) 
if (SelectVwsurf(vsurf) .ne. 0) call exit(3) 
call SetViewPort2(0.125, 0.875, 0.125, 0.75) 
call SetWindow(-50.0, 50.0, -10.0, 80.0) 
print *, 'initialization done' 
c 

c First line is drawn on screen after setting colors, 

c 

call DefColorIndices(vsurf, 1, 4, red, green, blue) 
call CreateTempSeg0 

print *, 'temporary segment created' 
call SetLineIndex(1) 
call MoveAbs2(0.0, 0.0) 
call LineAbs2(-100.0, 0.0) 
print *, 'first line created' 
call sleep(2) 
c 

c Second line is drawn on screen after changing colors. 

c 

call SetLineIndex(2) 
call MoveAbs2(0.0, 12.0) 
call LineAbs2(-0.0, 100.0) 
c 

c Display current vsurf info, 

c 

print *, 'my color map:' 

print *, 'screenname: ', screenname, 'windowname: ', windowname 

print *, 'cmapname: ', cmapname, 'cmapsize: ', cmapsize 

c 

c Close down SunCore. 

c 

call CloseTempSeg() 
call sleep(5) 

call DeselectVwsurf(vsurf) 
call TerminateCore0 
end 
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O Prism System 
3/110 


o 



Sun Model The model Sun 3/110 systems, known as ‘Prism’ systems, have frame buffer 

architecture that is unique among Sun workstations. Such systems have a 10-bit 
frame buffer that emulates both a ‘monochrome’ and a color frame buffer. This 
frame buffer is called /dev/cgfourO. 

The architecture for the 10-bit deep frame buffer is shown below. 

1 plane - enable plane 

1 plane - overlay plane group, monochrome, (/dev/bwtwoO) 

8 planes - color plane group, color, (/dev/cgfourO) 

where the enable plane bit at a pixel location is set to 
0 = color, 1 = monochrome. This is the plane group visible at 
that pixel location. 

The overlay plane group is the black and white plane, the other plane group for 
color. On the Sun model 3/110 as on all other Sun 2 and 3 color machines, a 
maximum of 256 colors are visible. 

When suntools is invoked with no options, all monochrome tools or 
applications appear from the overlay plane. All color tools or applications 
appear from the color planes. Tools that are invoked with color options appear 
from the color plane, and the other tools appear from the overlay plane. 

The most common usage of suntooIs on Sun model 3/110 systems is to then 
run different applications in the different planes. This allows the user to use the 
model 3/110 as if there were two monitors, like adjacentscreens allows. 
The user invokes sunt oo Is in the color planes first. Then, from a 
shelltool, invoke a separate suntools in the overlay plane. When 
suntools is invoked this way, a shelltool with no -Wf or -Wb options 
is running in the overlay or monochrome planes belonging to the suntools 
from wMch it was invoked. From both the color and overlay planes, 
switcher is run, so that you may toggle between the color and the overlay 
planes. 

An example follows, taken from the switcher (1) man page. 
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c 

>From the console, 

"suntools -8bit_color_only -toggle_enable" 

>You are now in the color planes. From a shelltool, 

"suntools -d /dev/bwtwoO -toggle_enable -n &" 

<suntools has been started in the overlay plane> 

"switcher -d /dev/bwtwoO -s i &" 

<a switcher icon should appear to allow you to switch to the overlay 
plane> 

>Click on the switcher icon, you are now in the overlay plane. 

>From a shelltool. 

"switcher -s o &" 

<a switcher icon should appear to allow you to switch to the color 
planes> 


On Sun model 3/110 systems, the default frame buffer, /dev / fb, refers to the 
color portion of the frame buffer. Applications such as s creendurap {1) and 
screenload (1) access /dev/fb by default. Thus screendump is 
equivalent to screendump -f /dev/fb, which is equivalent to 
screendump —f /dev/cgfourO. 

For more information on Sun model 3/110 systems, see the Release 3.2 Manual, 
part number 800-1364. 
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5 

QUESTIONS, ANSWERS, HINTS, 

AND TIPS 

Q&A, and Tip of the Month f ^ ^ 


This is the fourth in a continuing series of this column which I have created for 
two purposes.5 First, some questions are asked regularly on the AnswerLine. I 
feel everyone can benefit ftom distributing discussions of these problems as 
widely as possible. Second, a large and constantly growing body of information, 
hints, and tips are not documented anywhere. 

I will collect and distribute these information nuggets in this continuing column 
so that we can all learn from them. I will cover unusual topics, but this column 
should not be used as an alternative to contacting your support center or using the 
AnswerLine. 

If you have a question that you would like answered in this column, please mail 
your question to ‘Software Technical Bulletins’ at Sun Microsystems, Inc., 2550 
Garcia Avenue, M/S 2-34, Mountain View, CA 94043. You can also send in 
your question by electronic mail to sun/stb-editor. U. S. customers can call Sun 
Customer Software Services AnswerLine at 800 USA-4-SUN for technical 
questions on this column or any other article in this bulletin. I look forward to 
hearing ftom you! 

Yellow Pages and Mall Aliases This month we are going to look at the Yellow Pages and how fliey relate to mail 

aliases on your system, and then look at the rest of the .cshrc aliases I 
promised last month. 

Mail Aliasing When you send electronic mail, the system uses a set of alias files to allow 

people to set up mailing lists and make sure that mail gets to the right person. 
The three places where aliases can be set up are listed below. 




^ Ttiis continuing colunui is submitted by Chuq Von Rospach, Customer Software Services. 
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user/.raailrc 

This file is read by the /usr/ucb/Mail program, and 
allows a user to set up private aliases or mailing lists 
without administration intervention. 

/usr/lib/aliases 

This file is read by sendmail, and can be used to set up 
mailing lists or aliases global to the entire machine. 


mail.aliases 

This is a yellow pages map found in SunOS releases 3.0 
and subsequent releases. This allows an administrator to 
set up aliases in one location . The aliases are then 
accessible to all machines within the domain. 

Two processes need to be clearly understood; when these files are accessed, and 
in what order. When you send a piece of mail, the mail system processes it as 
described below. 

Every address is checked against your list of aliases in your .mailrc file. If 
there is a match, the alias is replaced with the list of entries in the .mailrc 
file. One example is shown below. 

alias friend chuq rx [.mailrc file] 

% mail friend 

This becomes translated to the entry that follows. 

% mail chuq rx 

In this example, the aliasing is quite limited, simply a straightforward string 
substitution that is space delimited. 

The message is then sent to sendmail, which inspects it and checks each 
mailing address in the order shown below. 

local aliases 
yellow page aliases 

Note that a match on the local alias does not keep the system fiom trying to 
rematch on the global alias. If the local alias file changes 'rx' to 'rx@suntoo' 
then the global alias file will not change it again to 'rx@ra^.' However, if you 
alias something locally that matches something in the yeUow page alias, it will 
get aliased again. 
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Pitfalls to Avoid 


Tip of the Month (TOM) 

Q 


After this aliasing, the mail is sent to the machine that does local delivery. On 
the local machine, a check is made for a . forward file. If it exists, the current 
mail address is replaced with the address in the . forward file, sendmail 
then aliases the address again. This process applies for multiple mail addresses 
as well. The .mailrc is not checked after the first round, though. When both 
roimds of aliasing are completed, sendmail drops the mail in your mailbox 
and all is done. 

There are a few points to remember to ensure proper mail processing. First, it is 
possible to set up degenerative alias loops using the mail.alias file. The 
most common problem is to set up your aliases using the ‘bang’ format (as in 
machineluser) instead of using the ‘at’ format (as in user@machine). The ‘bang’ 
format worked prior to Sun OS release 3.0. However, with the implementation 
the yellow pages map, mail then transfers between a client and mailhost until it 
fails due to too many transfers. ‘Bang’ addressing should be used only for 
machines that are outside the local netwoik, and then only when using UUCP for 
communication. 

Second, it is possible to set up forwarding loops with a . forward file that will 
cause mail to be destroyed. In general, you should avoid using the , forward 
file and put your aliases into the yeUow pages map instead. 

This month completes the lengthy .cshrc. This file includes a lot of 
miscellaneous aliases, shorthand command names, and other things to make 
working with Unix a little easier, nicer, and hopefully give you some ideas on 
customizing your environment so it works best for you. If you have some 
favorite aliases you want added to the next generation of the monster .cshrc, 
mail them to sunfstb-editor. 

The script appears on the following pages. 
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#! /bin/csh 

# Monster cshrc — everything you might ever want to do when you 

# use csh. 

# If we are running a script, do not source .cshrc for speed. 

# Prompt is set if we are interactive. 

# term is set if we have a tty attached (needed for at) 
if (! $?prompt) exit 

if (! $?term) exit 

# Note that echo is built in and therefore much faster than 

# calling pwd as a normal program. This does not work correctly 

# across symlinks. 
alias pwd 'echo $cwd' 

# set up general variables 

set history=99 # nice round number 

# These aliases let you bring a job to the foreground simply by 

# typing the job number. Very convenient, 
alias 1 %1 

alias 2 %2 
alias 3 %3 
alias 4 %4 
alias 5 %5 
alias 6 %6 
alias 7 %7 
alias 8 %8 
alias 9 %9 


o 


# Quick pushd/popd — pushd should really be +, 

# but that requires shift. 

# is shorthand for pushd $H0ME, which tends to happen often, 
alias - popd 

alias = pushd 
alias pushd 

# Back up the directory tree quickly, 
alias .. "cd .." 

# Quick sunview compiling. 

alias ccsv "cc * -Isuntool -Isunwindow -Ipixrect" 
alias ccsvg "co * -g -Isuntool -Isunwindow -Ipixrect" 

# lint alias. Lets you look at the libc lint library and check 

# a call's parameters. For example, 'check read.' 
alias check "grep * /usr/lib/lint/llib-lc" 

# Convenient shorthands. 
alias pe printenv 
alias h history 


^sun 

micfosystems 


My 1987 


o 



Section 5 — Q&A, Hints and Tips 295 



alias m more 

alias clean 'rm *.o core a.out' 

alias psa "ps axu I sort -f +0 +ln | more” 


# Safety hatches, 
alias cp cp -i 
alias mv mv -i 
alias rm rm -i 


# fg brings job into foreground, bg brings job into background, 

# and V restarts a stopped vi. 

# j lists jobs 

# k kills jobs; 'k 1' kills job 1, 'k' kills the most recent job, 

# shown with a '+' in the jobs list, 
alias V %vi 

alias j jobs -1 
alias k 'kill %*' 

# History editor. 

# Dump the history into a file, edit it, and then source it back. 

# Useful if you have a long, tedious command you do not want 

# to retype. 

set $hed /tmp/hed$$ 

alias hed history -h * > $hed; vi + $hed; source -h $hed 
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Errata Corrections 


Errata Corrections 


Routing to Standalone 
Machines 


Customer Distributed BugsList: 
Bug 1004564 



This article contains corrections to one article in the May STB issue, and to one 
bug in the CDB. 

Two corrections need to be made in the ‘Routing to Standalone Machines’ 
article. Make the two following corrections. 

On page 52, lines 3 and 5, replace the existing networic addresses with those 
shown below. On line 3, 

192.9.250.6 D 

and on line 5, 

thirdnet 192.9.250 

These corrections are needed since the last three components or parts of an 
Internet class C network number must be within the range 1 <= part <= 254. 

Two corrections need to be made in the May issue CDB to bug 1004564, on page 
89. Note the two printf commands on lines 8 and 10 of the code. 

For each printf command, replace the ‘backslash zero’ with a ‘backslash n’, 
followed by a double quotation mark. 
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THE HACKERS’ CORNER 


Determining Memory Size 



The Hackers’ Corner: 
Determining Available 
Memory 


Areas of Interest 


There are times when it might be helpful to know how much memory is available 
at the time you boot your system. This information is available in 
/ u s r / adm/me s s age s from dme sg, but lengthy, intelligent parsing through 
the file may be required. 

Unfortunately, no system or library calls are available that quickly give this 
information. However, this article contains a program that looks through kmem 
to see what the kernel remembers about its memory. 

The script or code contained in this article may be of interest to professionals, 
enthusiasts, or anyone having the time to key the script or code onto their system. 
If you email the STB editor a request for the script or code at sun!stb-editor, we 
will mail you an online copy. Please include the article name with your request. 

Also, please consult your local shell script or programming expert regarding any 
script or code problems. The script or code is not offered as a supported Sim 
product, but as an item of interest to enthusiasts wanting to try out something for 
themselves. 


An Introduction to the Program The kernel stores the amount of memory in a variable called physmem, which 

is initialized from the monitor Programmable Read Only Memory (PROM) when 
the kernel boots. The physmem value is the number of pages of physical 
memory minus the number of pages reserved by the monitor PROM for its 
fimctions. Note that these pages are not available to UNIX under any 
circumstances. 


The number of memory bytes is architecture-dependent. Sun2 workstations 
contain 2K pages, so you need to multiply the physmem value by 2048 to 
obtain the size of Sun2 physical memory in bytes. Sun3 workstations contain 8K 
pages, so you then need to multiply by 8192. One of the last lines in the code 
uses the getpagesize 0 function. This function returns the number of 
bytes-per-page for your system. You then get your memory size in bytes when 
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The Memory-Size Program 


the output of the program is multiplied by the value returned by 
getpagesize(). 



The program that follows looks through /dev/kmem to determine how much 
memory (in pages) you have. It then multiplies this value by the bytes-per-page 
using getpagesize (), yielding the system memory size in bytes. This value 
is the total memory available from UNIX, exclusive of the Sun monitor PROM 
reserves. 


#include <stdio.h> 
finclude <nlist.h> 


struct nlist nl[] = { 

{"_physmem "}, 
#define X_PHYSMEM 0 


); 


main 0 

{ 

int kmera; /* file descriptor into /dev/kmem */ 

int physmem; /* where to store obtained physmem — an 

* int in the kernel */ 


if ((kmem = open("/dev/kmem", 0)) < 0) 

{ 

perror("kmem"); 
exit(1); 

} 

nlist("/vmunix", nl); /* see nlist(3) */ 

if (nl[0].n_type == 0) 

{ 

perrorC'No namelist"); /* stripped your kernel! */ 
exit(1) ; 

} 


/* seek into kernel memory to where the variable lives */ 
lseek(kmem, (long) nl[X_PHySMEM].n_value, 0); 

/* obtain the value */ 

if (read(kmem, (char *) sphysmem, sizeof(physmem)) != sizeof(physmem)) 

perror("read") ; 
exit(1) ; 

} 


printf("Number of pages of memory on this system is: %d0, physmem); 
printf("Amount of memory on this system is: 0x%x0, getpagesize()*physmem); 
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Determining Devices Present 


The Hackers’ Comer: There ate times when it might be helpful to know what devices are present and 

Determining Devices Present connected to your system. Again, you might not want to have to intelligently 

parse through a file to reinvent the wheel. 

This article contains two programs, written by different programmers. Each 
approaches the effort to determine a machine’s configuration differently. Use 
these programs carefully since investigating what the kernel knows is more of an 
arcane art than some kind of supported interface. UNIX systems export few, if 
any, internal kernel interfaces or data structures. 

Professional Interest The script or code contained in this article may be of interest to professinals, 

enthusiasts, or anyone having the time to key the script or code onto Aeir system. 
If you email the STB editor a request for the script or code at sunistb-editor, we 
will mail you an online copy. Please include the article name with your request. 

Also, please consult your local shell script or programming expert regarding any 
script or code problems. The script or code is not offered as a supported Sun 
product, but as an item of interest to enthusiasts wanting to try out something for 
themselves. 

Program 0 This is the first of two programs that determine what devices are present on your 

system. This program appears on the following pages. 
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#ifndef lint 

static char *sccsid = "%Z%%M% %I% %E% SMI"; 
#endif 

/* 

* Print system hardware configuration 
*/ 

#include <stdio,h> 

#include <sys/param.h> 
tinclude <sys/fcntl.h> 

#include <nlist.h> 

#include <sys/buf.h> 

#include <3undev/nibvar .h> 

#include <sun/autoconf.h> 

#include <machine/inmu .h> 

#include <machine/cpu.h> 

static char *kmemf = "/dev/kmem"; 
static char *nlistf = "/vmunix"; 
static int kvm_des; 

static struct nlist nl[] = { 

#define X_MBDINIT 0 
{ "_nibdinit" }, 

#define X_CPUTYPE 1 
{ "_cpu" }, 

#define X_PHYSMEM 2 
{ "_physmem" }, 

{ "" } 

}; 

static int allflg; 
static void usage(); 
static void printconf(); 
static int kvmreadO; 

extern long lseek(); 

int 

main(argc, argv) 
int argc; 
char **argv; 

{ 

register char *argp; 
argc—, argv++; 

while (argc > 0 && **argv =='-') { 
argp = *argv++; 
argp++; 
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} 


argc—; 

while (*argp++) 
switch (argpt-1]) { 

case 'a': 

allflg++; 
break; 

default; 

usage <); 
exit(1); 

} 

} 

if (argc >1) { 

nlistf = argv[l]; 

argv++; 

argc—; 

} 

if (argc >1) ( 

kmemf = argv[l]; 

argv++; 

argc—; 

} 

if ((kvm_des = open(kmemf, 0_RD0NLY)) < 0) { 

(void) fprintf(stderr, "showconfig: Can't open "); 
perror(kmemf); 
exit(1); 

} 

if (nlist(nlistf, nl) < 0) { 

(void) fprintf(stderr, \ 

"showconfig: Can't get at kernel namelistO); 

/* XXX - need better error message */ 
exit(1); 

} 

printconf(); 
return (0); 


static void 
usage 0 
{ 


(void) fprintf(stderr, "usage: showconfig -a [system] [corejO); 
exit(1) ; 



static void 
printconf () 

{ 

unsigned long mbdptr; /* address of mb_device tbl */ 

unsigned long drvaddr =0; /* address of mb_driver */ 

unsigned long ctlraddr =0; /* address of itib_ctlr */ 

struct mb driver driver; 
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struct mb_ctlr ctlr; 

struct inb_device device; 

int cpu; 

int physmem; 

char dname[12]; 

char cname[12]; 

char *space; 

caddr_t addr; 

int intpri; 

unsigned long intvec; 

struct vec vecs[2]; 

register int i; 

register char *c; 

if (kvmread(kvm_des, (unsigned long) nl[X_CPUTYPE].n_value, 
(char *)&cpu, sizeof cpu) < 0) { 

perror("showconfig; Can't read cpu type"); 
exit(1); 

} 

/* 12345678901234567890123456789012345678901234567890 */ 

switch (cpu) { 

#if defined(SUN2_ARCH) 
case CPU_SUN2_120: 

(void) printf("Multibus Sun-20); 
break; 

case CPU_SUN2_50: 

(void) printf("VMEbus Sun-2 or Sun-2/500); 
break; 

default: 

(void) printf("Sun-2, unknown type %#4.4x0, cpu); 
break; 

#endif 

#if defined(SUN3_ARCH) 
case CPU_SUN3_160; 

(void) printf("Sun-3/75, Sun-3/160, or Sun-3/1800); 
break; 

case CPU_SUN3_50: 

(void) printf("Sun-3/50 or Sun-3/520); 
break; 

case CPU_SUN3_260; 

(void) printf("Sun-3/260 or Sun-3/2800); 
break; 

case CPU_SUN3_110: 

(void) printf(”Sun-3/1100); 
break; 

default: 






July 1987 






Section 6 — The Hackers’ Comer 305 


(void) printf("Sun-3, unknown type %#4.4x0, cpu); 
break; 

#endif 

} 

if (kvmread(kvm_des, (unsigned long) nl[X__PHYSMEM].n_value, 
(char *)Sphysmem, sizeof physmem) < 0) { 

perror("showconfig; Can't read amount of physical memory" 
exit(1); 


(void) printf("Physical memory = %dK0, ctob(physmem)/1024); 

mbdptr = nl[X_MBDINIT].n_value; 

(void) printf( 

" DEVICE SPACE HEX ADDRESS RANGE CTRLR SLV PRI 

while (1) { /* a 'for' would be a mess here */ 

/* 

* get the next mb_device entry 
*/ 

if (kvmread(kvm_des, mbdptr, \ 

(char *)fidevice, sizeof device) < 0) ( 
perror("showconfig: Can't read device entry"); 
exit(1); 

} 

if (device.md_driver == 0) /* end of table */ 

break; 

mbdptr += sizeof device; 

/* 

* get the mb_ctlr and mb_driver, if not current 
*/ 

if (drvaddr != (unsigned long) device.md_driver) { 
drvaddr = (unsigned long) device.md_driver; 
if (kvmread(kvm_des, drvaddr, (char *)&driver, 
sizeof driver) < 0) ( 

perrorC'showconfig: Can't read driver entry”); 
exit(1) ; 

) 

if (kvmread(kvm_des, (unsigned long)driver.mdr_dname, 
(char *)dname, sizeof dname) < 0) { 
perrorC'showconfig: Can't read device name"); 
exit(1) ; 

} 

if (device.md_mc != 0) { 
if (kvmread(kvm_des, \ 

(unsigned long)driver.mdr_cname, 

(char *)cname, sizeof cname) < 0) { 

perrorC'showconfig: \ 

Can't read controller name"); 
exit(1); 

} 

} 

} 


VECO); 
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if (device.md._mc != 0 && ctlraddr != \ 

(unsigned long)device.md_mc) { 

ctlraddr = (unsigned long)device.md_mc; 
if (kvmread(kvm_des, ctlraddr, (char *)&ctlr, 
sizeof ctlr) < 0) { 

perror("showconfig: \ 

Can't read controller entry"); 
exit(1); 

} 

} 

if (lallflg && !device.md_alive) 

continue; /* unconfigured device */ 

/* 

* Consistency checking 
*/ 

if (device.md_mc != 0) { 

if (device.md_ctlr == -1) { 

(void) printf( 

"%s%-2d - Bad controller number: md_ctlr: -10, 
dname, device.md_unit); 

} 

if (device.md_slave == -1) { 

(void) printf{ 

"%s%-2d - Bad slave number: md_slave: -10, 
dname, device.md_unit); 

} 

} 


if (device.md_alive && (device.md_mc == 0)) { 

if (device.md_ctlr != -1) { 

(void) printf( 

"%s%-2d - Controller number for unspecified controller: md_ctlr: %d0, 
dname, device.md_unit, 
device.md_ctlr); 

} 

if (device.md_slave != -1) { 

(void) printf( 

'*%s%-2d - Slave number for unspecified controller: md_slave: %d0, 
dname, device.md_unit, 
device.md_slave); 

} 

) 

if (device.md_mc != 0) { 

if (device.md_driver != ctlr.mc_driver) { 

(void) printf( 

"%s%-2d - Driver pointer mismatch: md__driver: %x mc_driver: %x0, 
dname, device.md_unit, 
device.md_drive r, ctlr.mc_drive r); 

} 

if (device.md ctlr != ctlr.mc_ctlr) ( 
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(void) printf( 

"%s%-2d - Controller number mismatch: md_ctlr: %d mc_ctlr: %d0, 
dname, device.md_unit, 
device.md_ctlr, ctlr.mc_ctlr); 

} 

} 

if (device.md_mc != 0 && device.md_alive && tctlr.mc_alive) { 
(void) printf( 

"%s%“2d - Controller not marked alive: %s%-2d0, 
dname, device.md_unit, 
cname, device.md_ctlr); 

} 

/* 

* Figure out the address space in which the device is mapped 

* Also, get the interrupt priority and vector 
*/ 

if (device.md_mc != 0) ( 

i = SP_BUSMASK & ctlr.mc_space; 
c = ”mc_"; 

addr = ctlr.mc_addr; 

intpri = ctlr,mc_intpri; 

intvec = (unsigned long)ctlr.mc_intr; 

} else ( 

i = SP_BUSMASK & device.md_space; 
c = ''md_"; 

addr = device.md_addr; 

intpri = device.md_intpri; 

intvec = (unsigned long)device.md_intr; 

} 

/* Read the first two vectors in */ 
if (intvec != 0) { 

if (kvmread(kvm_des, intvec, (char *)vecs, 
sizeof vecs) < 0) { 
perror("showconfig: \ 

Can't read interrupt vectors"); 
exit(1); 

) 

1 

/* 

* More consistency checking 
*/ 

if (intpri < 0 i| intpri >= 7) 

(void) printf( 

"%s%-2d - Illegal priority: %sintpri: %d0, 
dname, device.md_unit, c, intpri); 

if (intvec != 0 && vecs [0] . v_func === NULL) 

(void) printf( 

"%s%“2d - Null interrupt handler: %sintrO, 
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dname, device.md_unit, c); 



switch (i) { 

case SP_VIRTUAL: 

space = "virtual"; 
break; 

case S P_0BMEM: 

space = "obmem"; 
break; 

case SP_OBIO: 

space = "obio"; 
break; 

case SP_MBMEM: 

space = "mbmem"; 
break; 

case SP_MBI0: 

space = "itibio"; 
break; 

case SP_VME16D16: 

#if defined(SUN2_ARCH) 

space = "vmel6"; 

#else 

space = "vmel6dl6"; 

#endif 

break; 

case SP_VME24D16: 

#if defined(SUN2_ARCH) 

space = "vme24"; 

#else 

space = "vme24dl6"; 

#endif 

break; 

case SP_VME32D16: 

space = "vme32dl6"; 
break; 

case SP_VME16D32: 

space = "vinel6d32"; 
break; 

case SP_VME24D32: 

space = "vme24d32"; 
break; 

case SP_VME32D32; 

space = "vme32d32"; 
break; 
default: 

(void) printf( 

"%s%-2d - Unknown address space: %3space: %d0, 
dname, device.md_unit, c, i) ; 

case 0: 

space = "?7??"; 

} 
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/* 

* Now (finally) print out the information 
*/ 

(void) printf("%s", (device.md_alive ? " " : "*")); 
(void) printf("%8.8s%-2d ”, dname, device.md_unit)/ 
(void) printf("%8.8s ”, space); 
if (addr != 0) { 

(void) printf(”%08x-%08x ", 

addr, (addr + driver.mdr_size - 1)); 

} else 

(void) printf(” size:%#-6x ”, driver.mdr_size); 

if (device.md_mc != 0) 

(void) printf("%8.8s%-2d %3d ", 

cname, device.md_ctlr, device.md_slave); 

else 

(void) printf(" "); 

if (intpri != 0) 

(void) printf("%3d ", intpri); 

else 

(void) printf(” ”); 

if (intvec != 0 && vecs[0],v_func != NULL) { 
for (c = ""; ; ) ( 

(void) printf("%s %#x", c, vecs [0]. v_vec); 
if (vecs [1] .v_func == NULL) 
break; 

intvec + = sizeof (struct vec); 
if (kvmread(kvm_des, intvec, (char *)vecs, 
sizeof vecs) < 0) { 
perror("showconfig: \ 

Can't read interrupt vectors"); 
exit(1); 

} 

C = If II . 

f / 

} 

} else 

(void) printf(" "); 


(void) printf("0); 

) 

} 

static int 

kvmread(fd, addr, valuejptr, value_size) 
int fd; 

unsigned long addr; 
char *value_jptr; 
int value size; 


o 
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{ 

if (lseek(fd, (long) addr, 0) == -IL 

I I read(fd, value_ptr, value_size) != value_size) 
return (-1); 
return (0); 


} 
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Program 1 


A second program named probe. c looks into the kernel to determine what 
devices are present. It produces an output similar to that shown below. 


astra% probe 

siO at obio 0x140000 pri 2 

stO at siO slave 0 

stO at siO slave 32 

zsO at obio 0x20000 pri 3 

zsl at obio 0x0 pri 3 

leO at obio 0x120000 pri 3 

bwtwoO at obmem 0x100000 pri 4 

desO at obio OxlcOOOO not attached 

astra% 


Again, use this program on an experimental basis. Consult your local experts to 
see what they have to say.... Good luck! 


o 
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/* 

* lists all devices defined for a configuration 

* and indicates if a device has not been attached 

•k 

* usage: probe [vmunix] 

k 

* mark opperman 

* sun europe 

* 20 aug 86 
*/ 


♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 

♦include 


<stdio,h> 

<ctype.h> 

<nlist.h> 
<sys/param.h> 
<sys/file.h> 
<sys/types.h> 
<sys/buf.h> 
<sys/vmmac.h> 

<sys/dkbad.h> 
<machine/pa ram.h> 
<machine/pte.h> 
<sun/dklabel.h> 
<sun/dkio.h> 
<sundev/mbvar.h> 
<3undev/screg.h> 
<sundev/sireg.h> 
<sundev/scsi.h> 


struct nlist nl[] = { 

{ ■■_Sysmap", 0, 0, 0, 0 }, 

♦define NL_SYSMAP 0 

{ "_mbcinit", 0, 0/ 0, 0 }, 

♦define NL_MBCINIT 1 

{ "_mbdinit”, 0, 0, 0, 0 }, 

♦define NL_MBDINIT 2 

{ "_scdriver", 0, 0, 0, 0 }, 
♦define NL_SCDRIVER 3 

{ "_scsi_ntype", 0, 0, 0, 0 }, 
♦define NL_SCSINTYPE 4 

{ "_scsi_unit_subr", 0, 0, 0, 0 ), 
♦define NL_SCSIUNITSUBR 5 
{ "" }, 

♦define NL_LAST 6 

}; 




♦define physaddr(addr) (addr - KERNELBASE) 
♦define MAX_SCSI_DEV_NAME_LENGTH 3 
int mem; 
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struct pte *Sysmap; 
struct mb_ctlr *inbcinit; 
struct mb_device *inbdinit; 
struct inb_driver *scdriver; 
int scsi_ntype; 

struct scsi_unit_subr *scsi_unit_subr; 
char *vinunix = "/vmunix"; 


struct pte getpteO; 
extern char *malloc(); 
extern char *calloc(); 

main(argc, argv) 
int argc; 
char **argv; 

{ 

if (argc >2) { 

fprintf(stderr, "usage: %s [vmunix]0, argv[0]); 
exit(1>; 

) 

if (argc == 2) 

vmunix = argv[l]; 



if ((mem = open("/dev/mem", 0_Rr)0NLY) ) < 0) { 

perror("can't open /dev/mem"); 
exit(1); 

} 


getkvars () ; 
process (); 


getkvars() 

( 

register char *devname; 
register i; 

nlist(vmunix, nl); 

if (nl[NL_SYSMAP].n_type == 0 || nl[NL_MBCINIT].n_type == 0 

nl[NL_MBDINIT].n_type == 0 ) { 
fprintf(stderr, "no namelistO); 
exit(1); 

} 

for (i=0; i<NL_LAST; i++) { 

if (i == NL_SCDRIVER) /* need virtual address */ 
continue; 

if (nl[i].n_value >= KERNELBASE) 

nl[i].n_value = physaddr(nl[i].n_value); 

} 

sun 
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Sysmap = (struct pte *) nl[NL_SYSMAP].n_value; 
if (scdriver = (struct mb_ciriver *) nl [NL_SCDRIVER] .n_value) { 
kread(mem, nl[NL_SCSINTYPE].n_value, &scsi_ntype, 
sizeof(scsi_ntype)); 

scsi_unit_subr = (struct scsi_unit_subr *) 

calloc(scsi_ntype, sizeof(struct scsi_unit_subr)); 
kread(mem, nl[NL_SCSIUNITSUBR].n_value, scsi_unit_subr, 
scsi_ntype * sizeof(struct scsi_unit_subr)); 
for (i=0; i<scsi_ntype; i++) { 

devname = malloc(MAX_SCSI_DEV_NAME_LENGTH); 
kread(mem, scsi_unit_subr[i].ss_devname, devname, 
MAX_SCSI_DEV_NAME_LENGTH); 
scsi_unit_subr[i].ss_devname = devname; 

} 

} 

} 


process 0 
{ 

struct mb_ctlr mb_ctlr; 
struct mb_device mb_device; 
u_int addr; 
int n; 

for (addr = nl[NL_MBCINIT].n_value, n=0; ; n++) { 

kread (mem, addr, (caddr_t) &nib_ctlr, 
sizeof(struct mb_ctlr)) ; 
if (!mb_ctlr.mc_driver) 
break; 

addr += sizeof(struct mb_ctlr); 

} 

/* 

* Allocate one more controller than really exists and 

* mark its driver as zero to indicate the end 

* of the controllers. 

*/ 

mbcinit = (struct mb_ctlr *) calloc(n+1, sizeof(struct mb_ctlr)); 
kread(mem, nl[NL_MBCINIT].n_value, (caddr_t) mbcinit, 
n * sizeof(struct mb_ctlr)); 
mbcinit[n].mc_driver = (struct mb^driver *) 0; 

for (addr = nl[NL_MBDINIT].n_value, n=0; ;n++) { 
kread(mem, addr, (caddr_t) Smb_device, 
sizeof(struct mb_device)); 
if (!mb_device.md_driver) 
break; 

addr += sizeof(struct mb_device); 

} 

/* 

* Allocate one more device than really exists and 

* mark its driver as zero to indicate the end 

* of the devices. 


^sun 

mlcrosystams 


July 1987 






Section 6 — The Hackers’ Comer 315 



*/ 

mbdinit = (struct inb_device *) calloc(n+l, sizeof (struct itib_device) ) ; 
k:read(mein, nl [NL_MBDINIT] .n_value, (caddr_t) mbdinit, 
n * sizeof(struct mb_device)); 
mbdinit[n].md_driver = (struct mb_driver *) 0; 

init_ctlr_drivers(); 
init_device_drivers(); 
display(); 


* Emulate mapping in this process' address space. 
*/ 

update_drivers(old, new) 
register struct mb_driver *old; 
register struct mb_driver *new; 

{ 

register struct mb_ctlr *mc; 
register struct mb_device *md; 



} 


if (scdriver == old) 
scdriver = new; 

for (mc=itibcinit; mc->mc_driver; mc++) 
if (mc->mc_driver == old) { 
mc->mc_driver = new; 

} 

for (md=mbdinit; md->md_driver; md++) 
if (ind->md_driver == old) { 
rad->md_driver = new; 

} 


/* 

* Read in structures referenced by the inb_ctlr struct 

* and change pointers. 

*/ 

init_ctlr_drivers() 

{ 

Struct mb_ctlr *mc; 
struct mb_driver *mdr; 
struct vec *vec; 
char buf[16]; 



for (mc^mbcinit; mdr=mc->inc_driver; mc++) { 

if (mdr < (struct mb_driver *) KERNELBASE) 
goto intr; 

mdr = (struct mb_driver *) raalloc(sizeof(struct mb_driver)); 
kread(mem, mc->mc_driver, mdr, sizeof(struct mb_driver)); 
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update_d.rivers (mc->mc_d.river, mdr) ; 
if (mdr->mdr_dname) { 

kread(raem, mdr->mdr_dname, buf, sizeof<buf)); 
mdr->mdr_dname = malloc(strlen(buf)+1); 
strcpy(mdr->mdr_dname, buf); 

} 

if (mdr->mdr_cname) { 

kread(mem, mdr->mdr_cnarae, buf, sizeof(buf)); 
mdr->radr_cname = malloc (strlen (buf)+1) ; 
strcpy(mdr->mdr_cname, buf); 

} 

intr: 

if (mc->mc_intr) { 

vec = (struct vec *) malloc(sizeof(struct vec)); 
kread(mem, mc->mc_intr, vec, sizeof(struct vec)); 
mc->mc_intr = vec; 

} 

} 

} 



/* 

* Read in structures referenced by the mb_device struct 

* and change pointers. 

*/ 

init_device_drivers() 

{ 

struct mb_device *md; 
struct inb_driver *mdr; 
struct vec *vec; 
char buf[16]; 

for (md=mbdinit; mdr=md->md_driver; md-l-+) { 

if (mdr < (struct i!ib_driver *) KERNELBASE) 
goto intr; 

mdr = (struct mb_driver *) malloc(sizeof(struct mb_driver) ) ; 
kread(mem, md->md_driver, mdr, sizeof(struct mb_driver)); 
update_drivers (md->md_driver, mdr) ; 
if (mdr->mdr_dname) ( 

kread(mem, mdr->mdr_dname, buf, sizeof(buf)); 
mdr->mdr_dname = malloc(strlen(buf)+1); 
strcpy(mdr->mdr_dname, buf); 

1 

if (mdr->mdr_cname) [ 

kread(mem, mdr->mdr_cname, buf, sizeof(buf)); 
mdr->mdr_cname = malloc(strlen(buf)+1); 
strcpy(mdr->mdr_cname, buf); 

} 

intr: 

if (md->md_intr) { 

vec = (struct vec *) malloc(sizeof(struct vec)); 
kread(mem, md->md_intr, vec, sizeof(struct vec)); 
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nid->md_intr = vec; 


/* 


* Display all controllers/devices alive or not on the system. 

* Uses info in mbcinit and mbdinit. 

*/ 

display () 


register 

register 

register 

register 


struct nib_ctlr *mc; 
struct inb_device *md; 
struct inb_driver *radr; 
char *name; 


for (mc=mbcinit; mdr=mc->mc_driver; rac++) { 

doprobe{mc->mc_addr, mc->mc_space, mdr->mdr_cname, 
inc->mc_ctlr, mc->mc_alive, mc->mc_intpri, 
mc->mc intr); 




/* 

* Now look for devices attached to this controller 

* (even if it's not attached). 

*/ 

for (md=mbdinit; md->md_driver; md++) { 

if (md->md_driver != mdr || 

md->md_driver == (struct mb_driver *) -1 || 

md->md_ctlr 1= mc->mo_ctlr) 

continue; 

/* 

* SCSI devices kludge... 

*/ 

if (md->md_driver == scdriver) { 
md->md_driver->mdr_dname = 

scsi_unit_subr[TYPE(md->md_flags)].ss_devname; 

} 

printf (''%s%d at %s%d slave %d ", 
mdr->mdr_dname, md->md_unit, 
mdr->mdr_cname, mc->mc_ctlr, md->md_slave); 
if (!rad->md_alive) 

printf("not attached"); 
putchar('0); 

/* 

* -1 indicates that info has already been displayed 

* so not redisplayed below. 

*/ 

md->md_driver = (struct mb_driver *) -1; 

} 

} 


for (md=mbdinit; mdr=md->md driver; md++) { 
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if (mdr == (struct mb_driver *) -1) 
continue; 

doprobe{rad->md_addr, md->md_space, mdr->mdr_dname, 
md->md_unit, md->md_alive, md->md_intpri, 
md->md._intr) ; 

} 

} 



doprobe(addr, space, name, num, alive, intpri, intr) 
caddr_t addr; 
u_int space; 
char *name; 
short num; 
short alive; 
int intpri; 
struct vec *intr; 

{. 

char *addrspace; 
struct pte pte; 


if 


} 


(alive) { 

pte = getpte(addr); 

addr = (caddr_t) ((u_int) ptob(pte.pg_pfnum) | 
((u int) addr & PGOFSET)); 


#define SP_BUSMASK 
♦define SP_VIRTUAL 
♦define SP_OBMEM 
♦define SP_OBIO 
♦define SP_VME16D16 
♦define SP_VME24D16 
♦define SP_VME32D16 
♦define SP_VME16D32 
♦define SP_VME24D32 
♦define SP VME32D32 


OxOOOOFFFF 

0x00000001 

0x00000002 

0x00000004 

0x00000100 

0x00000200 

0x00000400 

0x00001000 

0x00002000 

0x00004000 


/* mask for bus type */ 


switch (space & SP_BUSMASK) { 
case SP_VIRTUAL: 

addrspace = "virtual"; 
break; 

case SP_OBMEM: 

addrspace = "obmem"; 
break; 

case SP_OBlO: 

addrspace = "obio”; 
break; 

case SP__VME16D16: 

addrspace = "vmel6dl6"; 
if (alive) 

addr = (caddr t) ((int) addr & OxffffOOOO); 
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break; 

case SP_VME24D16: 

addrspace = "vme24dl6"; 
if (alive) 

addr = (caddr_t) ( (int) addr & OxffOOOOOO); 
break; 

case SP_vme32D16: 

addrspace = "vme32dl6’'; 
break; 

case SP__VME16D32 : 

addrspace = ''vmel6d32"; 
if (alive) 

addr = (caddr_t) ((int) addr & OxffffOOOO); 
break; 

case SP_VME24D32: 

addrspace = ''vme24d32"; 
if (alive) 

addr = (caddr_t) ((int) addr i OxffOOOOOO); 
break; 

case SP_VME32D32: 

addrspace = "vme32d32"; 
break; 
default: 

addrspace = "unknown”; 
break; 

} 

printf("%s%d at %s Ox%x ", name, num, addrspace, addr); 

if (alive) { 

if (intpri) { 

if (intr == (struct vec *) 0) 
printf("pri %d ", intpri); 

else 

printf("vec 0x%x ", intr->v_vec); 

} 

} 

else { 

printf("not attached"); 

} 

putchar('0); 



kread(fd, off, into, size) 
int fd; 
long off; 
caddr_t into; 
u_int size; 

( 

if (off >= KERNELBASE) 
off = physaddr(off); 
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lseek(fd, off, 0); 

if (read(fd, into, size) != size) { 
perror("kread: read failed"); 
exit(1); 

} 

} 



struct pte 
getpte(a) 
u_int a; 

{ 

u_int v; 
struct pte pte; 

V = btop(physaddr(a)); 

kread(mem, (long) (Sysmap + v), &pte, sizeof(struct pte))/ 
return(pte); 


o 
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An Answermail Script 


The Hackers’ Corner: An 
Answermail Script 


Professional Interest 


Installation: General 


Installation: Specific User 



The script contained in this article may be used to respond to incoming mail 
messages when you are away from your workstation. It is particularly useful 
during training programs, time off, vacations, and the like. 

This script may be of interest to professionals, enthusiasts, or anyone having the 
time to key the script or code onto their system. If you email the STB editor a 
request for the script or code at sunistb-editor, we will mail you an online copy. 
Please include the article name with your request. 

Also, please consult your local shell script or programming expert regarding any 
script or code problems. This script or code is not offered as a supported Sun 
product, but as an item of interest to enthusiasts wanting to try out something for 
themselves. 

Some things that you will be able to do with the answermail script include 
defining infrequently-changing answermail parameters (for example, your 
backup contact person) with environment variables. You will also be able to set 
other parameters using command-line arguments. 

Use the at (1) command to install your answermail script. You will be able to 
set up the answermail script installation as soon as you know when you will be 
away from your woikstation, avoiding any last minute rush or the chance to 
forget 

To activate your mail answering machine, install the script for example, as 
/usr/local/answermail. To make it executable, use the command shown 
below. Note that your response to the machine prompt is shown in bold. 

% chmod -fx /usr/local/answermail 


If the filesystem where the script is installed is an NFS filesystem, it should be 
one that is hard-mounted on any workstation using the answermail script. 
Otherwise, incoming mail may return to the sender with confusing error 
messages, if the server is not responding at the moment the mail arrives. 

Please note the directory pathname where the shell script is installed must be 
entirely in lower case. The script will verify that this is true. 

To install the automatic answering machine for a particular user, log in as that 
user and run answermail -i. The script wiU prompt for some information 
and then create a file named . forward. The file wiU be located in that user’s 
home directory. Once the . forward file is created, answennail is‘on’for that 
user. 
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The . forward file contains one line as shown below. 
I /usr/local/answermail -a n>ail_dir 


The first character is a vertical bar, the pipe symbol. The flag -a indicates that 
you want to run in answer mode. mail_dir specifies where you want to store 
the saved mail. 

Again, please note that the directory pathname of the user’s mail must be entirely 
in lower case. The script will verily that this is true. 

Reading Mail When You Return When you return from your absence, log in and run answermail -r. This 

will remove the . forward file, the log of to whom the answering machine sent 
notices, and will put you in mail, reading the log of mail that arrived while you 
were away. 

The only mail reader program supported by this answermail script is Berkeley 
Mail. It caimot accommodate Emacs or Mh, for two examples. To use other mail 
reader programs, use the SunView program mailtool to read the folder. 
Exit Berkeley Mail using exit or x and invoke Mailtool on the folder 
answermail-maillog. 

Installation Details The answermail script checks the environment variable ans_maildir upon 

installation, and prompts for your mail directory pathname if the environment 
variable is not set. This information is required! ANS_MAILDIR is the 
directory (full UNIX pathname) where aU answermail parameter files and your 
messages will be stored. Note that the directory name must be in lower case, for 
compatibility with older versions of the sendmail program. 

The following paragraphs show the questions that answermail asks; the 
corresponding shell variable, if any; and an explanation of your response needed. 
The answermail script creates a file in fte user’s mail directory called 
answermail-parameters that contains lines that initialize these shell 
variables. 

Your Return Day or Date? (PHONE_BACKUP_MAILADDRESS) 

This is the optional date to incorporate in the message sent to 
those who send you mail. The default is for no return date in the 
reply. 

Explanation for Your Absence? (ABSENCE_MSG) 

This is the optional explanation of why you are away from your 
workstation. The explanation should be a complete sentence, 
since it will appear on a line by itself in the response message. 
The default is for no explanation in the reply. 

Mail Address for Your Backup Contact Person 

(PHONE_BACKUP_MAILADDRESS) This is the optional 
mail address to which to forward your phone messages while 
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Installation Shortcuts 


you are away from your woilcstation. An example is jdoe@sun. 
‘Phone messages’ are defined as any mail that contains the word 
‘phone’ in the subject line (case-insensitive). For example, you 
may want to forward your phone messages to a receptionist to a 
department administrator. The default is for no special 
treatment of phone messages. 

Backup Contact Person (BACKUP_CONTACT_DETAIL) 

This is the optional contact direction for your backup contact 
person. This is included in the message sent to people who send 
you mail. For example, Jane Doe, department administrator, 
(415) 987-1234. The default is for no backup contact person 
information in the reply. 

Respond to Mailing List Messages? 

This is an optional check to determine whether the message was 
sent to you personally, or to a mailing list that includes you. 
The default is not to respond to messages sent to mailing lists. 
You should answer ‘yes’ only in those cases where you want to 
send the ‘I’m away’ reply to every message you receive, 
including junk mail message senders and aU other mailing lists. 

Other Aliases to Check? (NAMELIST) 

This is for any optional alternate names in the mail address that 
you have on the system. The default is to include your login 
name only. 

Several of these parameters may be predefined as environment variables. In this 
case, the answermail script uses the environment variables and does not prompt 
interactively for the values. This allows a more rapid and easier automatic 
answermail installation using the UNIX at (1) command. See the Commands 
Reference Manual, part number 800-1295, for details. 

Parameters that may be defined in environment variables are shown below. 
ANS_MAILDIR 

ANS_PHONE_BACKUP_MAILADDRE S S 
ANS_BACKUP_CONTACT_DETAIL 
ANS NAMELIST 


When defining these environment variables, for example, in your , login file, 
be sure that multi-word values are enclosed in double quotation marks. This is 
shown in the examples that follow. Note also that the namelist syntax is an 
egrep-style regular expression. Each alias is separated by a vertical bar, |, 
and the entire expression must be enclosed in double quotation marics. An 
example is john | j smith. 
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To further aid automatic installation, your return date and message explaining 
your absence may be specified as command-line arguments when running 
answermail -i. See the example Shown below. 



answermail -i "Tuesday, March 19" "I have gone to Europe," 


If you supply only one argument, it will be used as the return date. Third and 
following arguments will cause an error. Be sure to place multi-word argument 
between double quotation marks. 

An example of using the at{l} command to automatically set up the 
answermail script at a future date is shown below. Note again that your 
responses to the machine prompts are shown in bold in the following example. 


machine% at 1:00A May 28 

at> answermail -i "Monday, June 14" "I have gone to Europe. 
at> ~D 
machine% 


The Answermail Script 


The answermail script appears on the following pages. Use it as an experiment, 
along with any advice from your local shell script or programming expert. Good 
luck! 


c 


o 
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#!/bin/sh -u 

# 

# Automatic mail answering machine 

# 

# static char sccsid [] = "0(#)answermail 1.21 87/06/26 SMI”; 

# 


#. 

# 

BASENAME=/usr/bin/basename 

LS=/bin/ls 

CAT=/bin/cat 

GREP=/bin/grep 

RM=/bin/rm 

PWD=/bin/pwd 

AWK=/bin/awk 

SED=/bin/sed 

TOUCH=/usr/bin/touch 

ECHO=/bin/echo 

ERROR=/bin/echo 

DATE=/bin/date 

MAIL=/usr/ucb/Mail 

CHMOD=/bin/chmod 

HOSTNAME=/bin/hostname 

TR=/usr/bin/tr 

LOWERCASE="$TR ' [A-Z] ' ' [a-z] ' " 

# 

# NOTE: 

# 

# Some of these filenames must be all in lower case. 

# It is good coding practice to make them all in lower case. 

# 

ANSWERMAIL_SUBJECT_LINE="Away from my mail" 

HEARDFROM_E I L)ENAME=ans we rma il-hea rdf rom 
MAILLOG_FILENAME=answermail-maillog 
PARAMS=answermail-parameters 
LOCKFILE=/tmp/answermail-lock 


SCRIPTNAME='$BASENAME $0' 

SYNTAX="$SCRIPTNAME -a|-i|-r [ Mail_Dir ]" 
case $# in 
0 ) 

# With no args at all, out of here 
$ERROR 1>&2 $SCR1PTNAME: Syntax: $SYNTAX 
exit 1 



esac 

case ${HOME-"No Home?"} in 
"No Home?" ) 

$ERROR 1>&2 $SCRIPTNAME: Must have home directory in environment, 
exit 1 
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f f 

esac 

# 

# Make sure that files will be readable by the sendmail daemon 

# later (it runs as root initially), even if the .forward file 

# and others are being created in a directory in an NFS filesystem. 

# 

umask 133 
case ”$1" in 
-a ) 

# Continue below with automatic answer procedure, 
shift 

-i ) 

# Invoke installation procedure, 
case $# in 

1 ) 

# No command line arguments - have to prompt for them. 

r f 

2 > 

# Second argument is return day/date. 

RETURN_DATE=”$2" 

f / 

3 ) 

# Second argument is return day/date; 

# third argument is explanation of absence. 

RETUFN_DATE="$2” 

ABS ENCE_MSG= •’ $ 3 " 

e t 

# ) 

$ERROR 1>&2 SSCRIPTNAME: Syntax: SSYNTAX 
exit 1 


esac 

$ECHO SSCRIPTNAME: Begin installation procedure... 

SECHO 

# 

# Home directory must be publicly executable, required so that 

# sendmail can read the .forward file, even if the home directory 

# directory is in an NFS filesystem. 

# 

$LS -ILd $HOME I SGREP -s "'’d.x" 

case $? in 
0 ) 

# Is publicly readable - continue 


* 


$ERROR 1>&2 
$ERROR 1>&2 
SERROR 1>&2 
$ERROR 1>&2 
$ERROR 1>&2 
SERROR 1>&2 


SSCRIPTNAME: 
SSCRIPTNAME: 
SSCRIPTNAME: 
SSCRIPTNAME: 
SSCRIPTNAME: 
SSCRIPTNAME: 


Your home directory must have public 
execute permission for sendmail to read 
your .forward file. If that is not 
acceptable, you cannot use SSCRIPTNAME. 
If it is acceptable, type the command 
'• ” chmod o+x $HOME 
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$ERROR 1>&2 $SCRIPTNAME: and run answermail again, 
exit 1 


esac 

case "$0" in 
/* ) 

SCRIPTPATH=$0 
/ / 

*/* ) 

SCRIPT?ATH='$PWD'/$ 0 


o 



$ECHO "(Required) Directory where this script lives?" 

$ECHO -n "=> " 
read SCRIPTHOME 

if [ ! -r "$SCRIPTHOME"/$SCRIPTNAME ] 
then 

$ERROR 1>&2 $SCRIPTNAME: I do not exist there, 
exit 1 
fi 

SCRIPTPATH="$SCRIPTHOME"/$SCRIPTNAME 

if [ "SSCRIPTPATH" != '$ECHO SSCRIPTPATH j $LOWERCASE' ] 
then 

$ERROR 1>&2 $SCRIPTNAME: Script pathname must be lower case, 
exit 1 
fi 


esac 

case ${ANS_MAiLDIR-"Not set"} in 
"Not set" ) 

$ECHO "(Required) Full pathname of your mail directory?" 
$ECHO -n "=> " 
read MAILDIR 


* ) 

MAILDIR="$ANS MAILDIR" 


esac 

if [ ! -d "$MAILDIR" ] 

then 

$ERROR 1>&2 SSCRIPTNAME: Mail directory "$MAILDIR" does not exist, 
exit 1 
fi 

if [ "$MAILDIR" != 'SECHO SMAILDIR | $LOWERCASE' ] 
then 

$ERROR 1>&2 SSCRIPTNAME: Mail directory "$MAILDIR" must be lower case, 
exit 1 
fi 


if [ -r $MAILDIR/$PARAMS ] 
then 


$ECHO SSCRIPTNAME: Already installed in your mail directory. 
$ECHO -n "$SCRIPTNAME: Proceed anyway? " 
read RESPONSE 
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case "$RESPONSE" in 
y I yes | Y | YES ) 

/ f 

* ) 

$ERROR 1>&2 $SCRIPTNAME; Installation aborted, 
exit 1 



esac 
f i 

$RM -f $HOME/.forward $MAILDIR/$PARAMS \ 
$MAILDIR/$HEARDFROM_FILENAME \ 
$MAILDIR/$MAILLOG_FILENAME 
case ${RETURN_DATE-"Not set"} in 
"Not set" ) 

$ECHO "(Optional) Your return day/date?" 
$ECHO -n "=> " 
read RETURN DATE 


esac 

case "$RETURN_DATE" in 

TT II ^ 

RETURN DATE=none 


esac 

case $(ABSENCE_MSG-"Not set"} in 
"Not set" ) 

$ECHO "(Optional) Explanation for your absence?" 
$ECHO -n "=> " 
read ABSENCE MSG 



esac 

case "$ABSENCE_MSG" in 

II II ^ 

AB S ENCE_MSG=none 
/ / 

esac 

case $(ANS_PHONE_BACKUP_MAILADDRESS-"Not set"} in 
"Not set" ) 

$ECHO "(Optional) Mail address for phone message backup?" 
$ECHO -n "=> " 

read PHONE BACKUP MAILADDRESS 


* ) 

PHONE BACKUP MAILADDRESS*"$ANS PHONE_BACKUP_MAILADDRESS" 


esac 

case "$PHONE_BACKUP_MAILADDRESS" in 

II 11 ^ 

PHONE_BACKUP__MAILADDRESS=none 

f f 

* ) 

$ECHO '$DATE' " $PHONE_BACKUP_MAILADDRESS"\ 
» $MAILDIR/$HEARDFROM_FILENAME 
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/ t 

esac 

case ${ANS_BACKUP__CONTACT_DETAIL-”Not set") in 
"Not set" ) 

$ECHO "(Optional) Backup contact name/telephone/email address/etc.?" 

$ECHO -n "=> " 

read BACKUP CONTACT DETAIL 


* > 

BACKUP_CONTACT DETAIL="$ANS BACKUP CONTACT DETAIL" 


esac 

case "$BACKUP_CONTACT_DETAIL" in 

IVII ^ 

BACKUP CONTACT DETAIL=none 


esac 

PHONE_BACKUP_MAILADDRESS=''$ECHO $PHONE_BACKUP_MAILADDRESS ]\ 

$SED -e "/r/s/r/'-'-r-r-r-rnf/g.. > 

RETURN_DATE='$ECHO $RETURN_DATE |\ 

$SED -e »/'/s/'/g”" 

ABSENCE_MSG='$ECHO $ABSENCE_MSG i\ 

$SED -e "/r/s/r"Vg"' 

BACKUP_CONTACT_DETAIL='$ECHO $BACKUP_CONTACT_DETAIL |\ 

$SED -e "/>/s/'/g”^ 

$ECHO »$MAILDIR/$PARAMS \ 

"PHONE_BACKUP_MAILADDRESS='$PHONE_BACKUP_MAILADDRESS'" 

$ECHO »$MAILDIR/$PARRMS \ 

"RETURN_DATE='$RETURN_DATE'" 

$ECHO »$MAILDIR/$PARAMS \ 

"ABSENCE_MSG='$ABSENCE_MSG'" 

$ECHO »$MAILDIR/$PARAMS \ 

"BACKUP_CONTACT_DETAIL='$BACKUP_CONTACT_DETAIL'" 
case $(ANS_NAMELIST-"Not set"} in 
"Not set" ) 

$ECHO -n "(Optional) Respond to mailing list messages? " 
read NAMECHECK 
case "$NAMECHECK" in 
y I yes | Y | YES ) 

NAMELIST=nobody 

/ r 

* ) 

$ECHO "-Automatically checking for $USER." 

NAMELIST=$USER 

ALIAS="" 

while [ "$ALIAS" != "no more" ] 
do 

$ECHO -n "(Optional) Other aliases to check? " 

read ALIAS 

case "SALIAS" in 

II IT ^ 

# No more aliases to add 
ALIAS="no more" 
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* ) 

NAMELIST="$NAMELIST|$ALIAS" 


esac 

done 



esac 


* ) 

NAMELIST="$ANS_NAMELIST" 

/ f 

esac 

NAMEL1ST='$ECH0 $NAMELIST | $SED -e ••/'/s/'/g” ' 
$ECHO "NAMELIST='$NAMELIST'" »$MAILDIR/$PARAMS 

■# 

# All parameters are set in the parameter file, 

# now install the '.forward' command to invoke the script. 

# 

$ECHO " 

$ECH0 ”” 

$ECH0 $SCRIPTNAME: Automatic mail answering service installed, 
exit 0 


# Invoke removal and read procedure. 

# Complain if extraneous arguments. 
case $# in 

1 ) 

# Continue 

/ r 

# ) 

$BRROR 1>&2 $SCRIPTNAME: Syntax: $SYNTAX 
exit 1 



esac 

$RM -f $HOME/.forward 

case ${ANS_MAILDIR-"Not set”) in 

"Not set" ) 

$ECHO $SCRIPTNAME: Pathname of your mail directory? 
$ECHO -n "=> " 
read MAILDIR 

r t 

* ) 

MAILDIR="$ANS MAILDIR" 


esac 

if [ ! -d "$MAILDIR" ] 
then 

$ERROR 1>&2 $SCRIPTNAME; Mail directory "$MAILDIR" does not exist, 
exit 1 
f i 

$RM -f $MA1LDIR/$HEARDFR0M_FILENAME $MAILDIR/$PARAMS 
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$ECHO $SCRIPTNAME: Automatic mail answering service removed. 

if [ -s $MAILDIR/$MAILLOG_FILENAME ] 

then 

$MAIL -f $MAILDIR/$MAILLOG_FILENAME 
exit $? 
fi 

$RM -f $MAILDIR/$MArLLOG_FILENAME 

$ECHO $SCRIPTNAME: No answermail backlog in ${MAILDIR}. 
exit 0 


* ) 

# Bogus switch, report syntax error 
$ERROR 1>&2 $SCRIPTNAME: Syntax: $SYNTAX 
exit 1 

t / 

esac 

# 

# ===================== Automatic response section =========================== 

# 

case $# in 
0 ) 

# Without at least a place to put the mail, we can not continue. 

$ERROR 1>&2 $SCRIPTNAME: Missing mail log directory? 

exit 1 
/ / 

1 ) 

MAILDIR=$1 

* ) 

# BUG - (Or someone edited their .forward file.) 

$ERROR 1>&2 $SCRIPTNAME: Too many args "($#)" for '"-a"', 
exit 1 


esac 

HEARDFROM= $MAILD1R/$HEARDFROM_FILENAME 
MAILLOG=$MAILDIR/$MAILLOG_FILENAME 
MSGTMP=/tmp/answermai1-tmp_$$ 

MSGTMPl=/tmp/answermail-tmpl_$$ 

MSGDATA=/tmp/answermail-data_$$ 

# 

# Clean up interrupts. 

# 

trap "$RM -f $MSGTMP $MSGTMP1 $MSGDATA; $ERROR 1>&2 Interrupted.; exit 1" 1 2 

$RM -f $MSGTMP $MSGTMP1 $MSGDATA # Make sure temp files clear. 

$CAT > $MSGTMP # Save incoming message. 

if [ $? != 0 -o ! -s $MSGTMP ] 

then 

# 

# The script will not actually die at this point from 

# losing the incoming message. But if the message is 
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# lost, we may as well stop now. 

# 

$ERROR 1>&2 $SCRIPTNAME: Sorry - error while receiving your message. 
$ERROR 1>&2 $SCRIPTNAME: /trap filesystem on '$HOSTNAME' probably full! 
$RM -f $MSGTMP $LOCKFILE 
exit 1 
f i 
# 

# 

# Instantiate the parameters created at install time and check validity. 

# 

NAMELIST=none 

PHONE_BACKUP_MAILADDRESS=none 

RETURN_DATE=none 

AB SENCE_MS G=none 

BACKUP_CONTACT_DETAIL=none 

case "$NAMELIST" in 

none ) 

# This is the last parameter put in the file - something is wrong. 
$ERROR 1>&2 $SCRIPTNAME; Invalid parameter file from installation. 

$RM -f SMSGTMP SLOCKFILE 
exit 1 


esac 

# 

# Parse the mail message for sender, adressee, subject, etc. 

# 

# This awk script attempts to reliably parse portions of 

# the mail header. The idea is to look for the first 'From:' 

# line in the message, the first 'Subject:' line, if any, and 

# your own name in the 'To:' or 'Cc:' lines' if any. With 

# this information we can avoid answering mail to mailing 

# lists or blind copies. 

# 

# But first, protect any single-quote characters in the 

# input message in case they are in, for example, the subject 

# field and would cause problems later on when we 

# instantiate the values of the key fields. To do so, 

# change all single-quotes (') to 

# 

# Interpret the following command as 

# /'/s/'/' " ' " '/g 

$SED -e '•/'/s/'/g" $MSGTMP > $MSGTMPl 

if [ $? != 0 -o ! -s SMSGTMPl ] 

then 

$ERROR 1>&2 SSCRIPTNAME: Sorry - error while processing your message. 
$ERROR 1>&2 SSCRIPTNAME: /tmp filesystem on '$HOSTNAME' probably full! 
$RM -f SMSGTMP SMSGTMPl $LOCKFILE 
exit 1 
fi 

$AWK -f - $MSGTMP1 « !End!Awk!Script! > $MSGDATA 
begin { sender = subject = 

to = into =0; cc = incc = 0 } 
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(sender=="" && =="From:") { sender = ; 

printf("SENDER='"); 
for (i=2; i < NF; i++) { 
printf("%s ", ); 

} 

printf("%s'0, F); 
next; 

} 

(to=="" && ==»To:") { into = 1 } 

(into!=0 && /$NAMELIST/) { to = "[You are on the list]" } 

(into!=0 && substr(,length 0,1)==";" && !="To:")\ 

{ into = 0 } 

(subject=="" && =="Subject:")\ 

{ subject = ; 
printf("SUBJECT='"); 
for (i=2; i < NF; i++) { 

printf("%s ", ); 

} 

printf ("%s'^ 0, F) ; 
next; 

} 

{to=="" && =="Cc:") { incc = 1 } 

(incc!=0 && /$NAMELIST/) ( to = "[You are on the list]" } 

(incc!=0 && substr(,length(),1)==";" && !="Cc:")\ 

[ incc = 0 } 

(NF==0 II =="Status:") [ printf("ENVELOPE_END_LINE=%dO, NR); 
exit } 

END { if (subject == "") { 

subject="?-no subject line in your message-?"; 
printf("SUBJECT=' (%s)'0, subject); 

} 

if (sender == '■■• ) { 
sender="No sender!?" 
printf("SENDER='(%s)'0, sender); 

) 

if (to == "") [ 

to = "[Not sent to you]"; 

} 

printf("TO='%s'0, to); 

} 

!End!Awk!Script! 

if [ $? != 0 -O ! -s SMSGDATA ] 

then 

$ERROR 1>&2 SSCRIPTNAME; Sorry - error while processing your message. 
$ERROR l>i2 SSCRIPTNAME: /tmp filesystem on '$HOSTNAME' probably full! 
$RM “f $MSGTMP SMSGTMPl $MSGDATA $LOCKFILE 
exit 1 
fi 
# 

# Instantiate the environment variable settings created by the awk script. 

# 

$RM -f $MSGDATA $MSGTMP1 
# 
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# Rework address of sender, if necessary, for the mailer. 

# Example field that causes the problem; 

# From: John Smith (UNIX Expert) <js'ith@nowhere> 

# Mailer will try to reply to 'John', 'Smith”, and 'jsmith@nowhere' 

# due to input handling conventions. See routine 'skin' in 

# 'src/ucb/Mail/aux.c' for details on how to strip such addresses. 

# 

# NOTE: Given a message with multiple senders on the 'From;' line 

# (if that is even legal), the reworking here will reply only 

# to one sender, with precedence to the rightmost sender in 

# '<...>'s. But implementing fully correct RFC822 stripping 

# would be difficult. 

# 

SENDER='$ECHO $SENDER | $SED -e 's/,*<)>.*/<!>/'' 

# 

# Append incoming message to mail log. 

# 

# Note: It is up to us to ensure that the mail log file is formatted properly 

# for the mail reader. That job is not done by the software that sent 

# the outgoing mail, since such formatting is a local mail-handler 

# property. 

# 

# In the case of the UNIX mail readers, proper formatting of a mail 

# folder means that the 'message boundary' is defined as a blank line 

# followed by a line starting with the word 'From' in the left margin. 

# So we must ensure that: 

# - there is a blank line at the end of every message 

# in the log file, 

# - any lines beginning with the word 'From' in the left 

# margin, that are part of the body of the message, have 

# that word protected by prepending an '>'. This is the 

# conventional mechanism. 

# 

# Make sure that the mail log file will not be publicly readable so that 

# incoming mail remains private. 

# 

$TOUCH $MAILLOG # Ensure logfile exists. 

$CHMOD 600 $MAILLOG # Make private read-write only. 

$SED -e ''$ENVELOPE_END_LINE,/'From />From /" $MSGTMP » $MAILLOG 
$ECH0 "" » $MAILLOG # Ensure message separator. 

# 

# Special cases: 

# Ignore messages from certain 'people'. 

# MAILER-DAEMON, -!MAILER-DAEMON, Mailer-Daemon, and the like. 

# Ignore messages from answermail itself. 

# 

$ECHO "$SENDER" 1 $GREP -s -i "mailer-daemon”# Note pattern in lower case, 
case $7 in 
0 ) 

$RM -f $MSGTMP $LOCKFILE 
exit 0 


esac 
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case "$SUBJECT" in 
"$ANSWERMAIL_SUBJECT_LINE" ) 

$RM -f $MSGTMP $LOCKFILE 
exit 0 

t / 

esac 

# 

# Check for phone messages and send them to the backup contact person, 

# as long as there is a backup contact person and the message 

# did not come from that person in the first place. 

# 

$ECHO "SSUBJECT" | $GREP -s -i "phone" # Note pattern in lower case! 
case $? in 
0 ) 

IS_PHONE_ME S SAGE=t rue 

case "$PH0NE_BACKUP_MA1LADDRESS" in 

none ) 

# Fall through. 

/ f 

*"$SENDER"* ) 

# Do not forward a message from our backup contact person 

# back to him or her. 

# 

# Note match for 'pattern contained in', not ''exact'. 

# This handles cases where people add 'comments' to their 

# mail address, for example, their full name or title. 

# 

# This will fail to forward phone messages in the 

# case that someone else sending phone messages has the 

# backup contact person's address embedded in it. 

/ t 

* ) 

($ECHO This phone message has been logged, but ; \ 

$ECHO please follow up on it if it looks urgent ;\ 

$ECHO \ 

$ECHO " :unset record"; \ 

$SED -e "l,/“d" -e /" < $MSGTMP) |\ 

$MAIL -s "Forwarded *** PHONE MESSAGE ***" \ 

"$PHONE_BACKUP_MAILADDRESS" 

f » 

esac 

f r 

1 ) 

IS_PHONE_MESSAGE=false 

# Not obviously a phone message, so fall through. 

t / 

* ) 

IS_PHONE_MESSAGE=false 

# grep error of some sort, just fall through. 

/ / 

esac 

# 

# Now decide whether to notify the person 
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# who sent the message about your absence. 

# 

case "SSENDER" in 
"No sender!?" ) 

# If there was no 'From:' line then there is not a lot more we can do. 
$RM -f $MSGTMP SLOCKFILE 

exit 0 

f / 

esac 

case "$NAMELIST" in 
nobody ) 

# Do not check whether the mail was really sent to us. 


* ) 

case "$T0" in 
"[Not sent to you]" ) 

# We must have been on a mailing list, or Bcc'ed. 
$RM -f $MSGTMP $LOCKFILE 
exit 0 


# The mail was addressed to us, or we were copied. 

# - Fall Through - 


esac 


esac 

$TOUCH $HEARDFROM # Make sure the list exists. 

# 

# 

$GREP -s " $SENDER" $HEARDFROM # Have we already notified? 

case $? in 
0 ) 

# We have already sent a warning to the sender of 

# this message, so there is nothing more to do. 


# This is the first message from this sender. 

# Add the sender to the log and send a return notice. 
$ECHO '$DATE' " $SENDER" » $HEARDFROM 

case "$RETURN_DATE" in 
none ) 

RETURN MSG="" 


* ) 

RETURN MSG="I'll be back on $RETURN_DATE." 


esac 

case "$BACKUP_CONTACT_DETAIL" in 
none ) 

BACKUP_MSG1="" 

BACKUP_MSG2="" 

f r 
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BACKUP_MSGl="If your message is too urgent to wait, please contact" 
BACKUP MSG2="$BACKUP CONTACT DETAIL." 


esac 

$MA1L -S "$ANSWERMAIL_SUBJECT_LINE" "$SENDER" « lEnd'Mail! \ 

>/dev/null 2>&1 

:unset record 

Hi. I'm away from the office for a few days. 

$ABSENCE_MSG 

$RETURN_MSG 

The mail you just sent me concerning "$SUBJECT" 
has been saved, and I'll read it when I return. 

$BACKUP_MSG1 

$BACKUP_MSG2 

Thanks for your patience. 

!End!Mail! 

;; # NOTE: The blank line at the end of the message 

# text shown above is necessary. 

* ) 

# There was some sort of error from grep. 



esac 

$RM -f $MSGTMP $LOCKFILE 
exit 0 
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